Bearing on a great circle

Time bar (total: 26.1s)

start0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated; 0ms collecting garbage

analyze677.0ms (2.6%)

Memory
-34.9MiB live, 201.2MiB allocated; 42ms collecting garbage
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
7.8%7.8%92%0.2%0%0%0%9
7.8%7.8%92%0.2%0%0%0%10
10.2%10.1%89.7%0.2%0%0%0%11
10.2%10.1%89.7%0.2%0%0%0%12
Compiler

Compiled 26 to 19 computations (26.9% saved)

sample6.5s (24.9%)

Memory
161.4MiB live, 4 913.9MiB allocated; 1.0s collecting garbage
Samples
5.5s5 891×1valid
437.0ms2 363×0valid
2.0ms2valid
Precisions
Click to see histograms. Total time spent on operations: 5.6s
ival-sin: 2.4s (42.2% of total)
ival-cos: 2.2s (39.1% of total)
adjust: 387.0ms (6.9% of total)
ival-mult!: 314.0ms (5.6% of total)
ival-atan2: 261.0ms (4.6% of total)
ival-sub!: 87.0ms (1.5% of total)
Bogosity

preprocess79.0ms (0.3%)

Memory
-33.4MiB live, 56.7MiB allocated; 22ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0107372
1502368
24848368
Stop Event
node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
76.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Compiler

Compiled 38 to 34 computations (10.5% saved)

series467.0ms (1.8%)

Memory
5.1MiB live, 490.1MiB allocated; 95ms collecting garbage
Counts
17 → 120
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
Outputs
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda1 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2)))
#s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))
#s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))))))))
#s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (- lambda1 lambda2) (-.f64 lambda1 lambda2))
#s(approx lambda1 lambda1)
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda1 (-.f64 (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2))))))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2))))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (-.f64 (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (- lambda1 lambda2) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 phi1))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 phi1))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 #s(literal -1 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
#s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1)))))
#s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (sin.f64 lambda1)))))))
#s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (cos.f64 lambda1)))))))))
#s(approx (- lambda1 lambda2) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx lambda2 lambda2)
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda2 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda2 (-.f64 (*.f64 lambda2 (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1))))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (-.f64 (*.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (sin.f64 lambda1))))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1))))))
#s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (sin.f64 phi1))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))
#s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (sin.f64 phi1))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi2) (*.f64 #s(literal 1/6 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (* (cos phi1) (sin phi2)) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 phi2)))))
#s(approx (* (cos phi1) (sin phi2)) (+.f64 (sin.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi2) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 phi2)))))))
#s(approx (* (cos phi1) (sin phi2)) (+.f64 (sin.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 phi2)) (*.f64 #s(literal 1/24 binary64) (sin.f64 phi2))))))))
#s(approx (cos phi1) #s(literal 1 binary64))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx phi1 phi1)
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 phi1 (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 phi1 (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 phi1 (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
#s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2)))
#s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (+.f64 (cos.f64 phi2) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 phi2))))))
#s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (+.f64 (cos.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi2) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 phi2))))))))
#s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (+.f64 (cos.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 phi2)) (*.f64 #s(literal 1/120 binary64) (cos.f64 phi2)))))))))
#s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
#s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (* (cos phi1) (sin phi2)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
#s(approx (cos phi1) (cos.f64 phi1))
#s(approx (* (sin phi1) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))
#s(approx (sin phi1) (sin.f64 phi1))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/24 binary64) (sin.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))
#s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx phi2 phi2)
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 phi2 (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 (cos.f64 phi1))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
#s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1)))
#s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 phi1))))))
#s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 phi1))))))))
#s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 phi1)) (*.f64 #s(literal 1/120 binary64) (cos.f64 phi1)))))))))
#s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))
#s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))))))
#s(approx (* (sin phi1) (cos phi2)) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1)))))
#s(approx (* (sin phi1) (cos phi2)) (+.f64 (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1)))))))
#s(approx (* (sin phi1) (cos phi2)) (+.f64 (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1)) (*.f64 #s(literal 1/24 binary64) (sin.f64 phi1))))))))
#s(approx (cos phi2) (cos.f64 phi2))
Calls

12 calls:

TimeVariablePointExpression
51.0ms
phi2
@inf
((atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) lambda1 lambda2 (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (cos phi2)) (sin phi1) (cos (- lambda1 lambda2)))
3.0ms
lambda1
@inf
((atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) lambda1 lambda2 (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (cos phi2)) (sin phi1) (cos (- lambda1 lambda2)))
3.0ms
lambda1
@-inf
((atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) lambda1 lambda2 (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (cos phi2)) (sin phi1) (cos (- lambda1 lambda2)))
3.0ms
phi2
@-inf
((atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) lambda1 lambda2 (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (cos phi2)) (sin phi1) (cos (- lambda1 lambda2)))
3.0ms
lambda2
@0
((atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) lambda1 lambda2 (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (cos phi2)) (sin phi1) (cos (- lambda1 lambda2)))

rewrite1.3s (5%)

Memory
28.7MiB live, 685.7MiB allocated; 330ms collecting garbage
Counts
17 → 399
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
Outputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (fabs.f64 phi2))) (sin.f64 (-.f64 (fabs.f64 phi2) (-.f64 lambda2 lambda1)))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(*.f64 (-.f64 (sin.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (/.f64 #s(literal 1 binary64) (neg.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 lambda1 lambda2) (-.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 lambda1 lambda2) (-.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (sin.f64 phi2) #s(literal 0 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) #s(literal 0 binary64))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) #s(literal 1 binary64))))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64)))
(+.f64 (/.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (fabs.f64 phi2))) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 (fabs.f64 phi2) (-.f64 lambda2 lambda1))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(-.f64 (/.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (sin.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)))
(-.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)))
(-.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (neg.f64 (/.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64))))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (fabs.f64 phi2))) (sin.f64 (-.f64 (fabs.f64 phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (neg.f64 (neg.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(/.f64 (-.f64 (sin.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (fabs.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (fabs.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) #s(literal 2 binary64) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (fabs.f64 phi2))) (sin.f64 (-.f64 (fabs.f64 phi2) (-.f64 lambda2 lambda1))))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))))) (neg.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 (sin.f64 phi2) #s(literal 0 binary64)) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (cos.f64 phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi2) #s(literal 0 binary64)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) #s(literal 1 binary64))))
(fma.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64)))
(fma.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)))
(fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(neg.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda2 lambda1))))
(neg.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(neg.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (neg.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (-.f64 (sin.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)))
(+.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 (neg.f64 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (neg.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda1))) (sin.f64 lambda2)))
(cos.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (+.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(neg.f64 (sin.f64 (-.f64 lambda2 lambda1)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin.f64 (+.f64 (-.f64 lambda2 lambda1) (PI.f64)))
(+.f64 (neg.f64 lambda2) lambda1)
(+.f64 lambda1 (neg.f64 lambda2))
(+.f64 (neg.f64 (neg.f64 lambda1)) (neg.f64 lambda2))
(+.f64 (neg.f64 lambda2) (neg.f64 (neg.f64 lambda1)))
(-.f64 lambda1 lambda2)
(-.f64 (neg.f64 lambda2) (neg.f64 lambda1))
(neg.f64 (-.f64 lambda2 lambda1))
lambda1
lambda2
(neg.f64 (neg.f64 lambda2))
(+.f64 (*.f64 (cos.f64 phi2) #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) #s(literal 0 binary64)))
(+.f64 (*.f64 (sin.f64 phi2) #s(literal 0 binary64)) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (fabs.f64 phi2)) #s(literal 0 binary64)) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64)) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(-.f64 (*.f64 (sin.f64 phi2) #s(literal 0 binary64)) (neg.f64 (*.f64 (cos.f64 phi2) #s(literal 1 binary64))))
(-.f64 (*.f64 (sin.f64 phi2) #s(literal 0 binary64)) (*.f64 (neg.f64 (cos.f64 phi2)) #s(literal 1 binary64)))
(-.f64 (*.f64 (sin.f64 phi2) #s(literal 0 binary64)) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(cos.f64 phi2)
(cos.f64 (fabs.f64 phi2))
(cos.f64 (neg.f64 phi2))
(cos.f64 (neg.f64 (fabs.f64 phi2)))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 phi2))))
(fma.f64 (sin.f64 (fabs.f64 phi2)) #s(literal 0 binary64) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (neg.f64 phi2)) #s(literal 0 binary64) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (cos.f64 phi2) #s(literal 1 binary64) (*.f64 (sin.f64 phi2) #s(literal 0 binary64)))
(fma.f64 (sin.f64 phi2) #s(literal 0 binary64) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi2) (*.f64 (sin.f64 phi2) #s(literal 0 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 phi2) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(sin.f64 (+.f64 (fabs.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
phi2
(neg.f64 (neg.f64 phi2))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 (neg.f64 phi1))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1)) (sin.f64 (neg.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(+.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(+.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2))))
(+.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (fma.f64 (cos.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 (neg.f64 phi1)))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1)) (sin.f64 (neg.f64 phi1))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2)))
(/.f64 (-.f64 (+.f64 (sin.f64 (-.f64 phi2 (fabs.f64 phi1))) (sin.f64 (+.f64 (fabs.f64 phi1) phi2))) (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (-.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(literal 2 binary64)) (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 phi2 (fabs.f64 phi1))) (sin.f64 (+.f64 (fabs.f64 phi1) phi2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64) (-.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi2 (fabs.f64 phi1))) (sin.f64 (+.f64 (fabs.f64 phi1) phi2))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 (neg.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (neg.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 (neg.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (+.f64 (sin.f64 (-.f64 phi2 (fabs.f64 phi1))) (sin.f64 (+.f64 (fabs.f64 phi1) phi2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1)) (sin.f64 (neg.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1)) (sin.f64 (neg.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(fma.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))) (cos.f64 phi2) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2)))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2)))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)) (cos.f64 phi2) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1)) (sin.f64 (neg.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1)) (sin.f64 (neg.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (-.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 (neg.f64 phi1)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1)) (sin.f64 (neg.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 (neg.f64 phi1)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1)) (sin.f64 (neg.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 (neg.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1)) (sin.f64 (neg.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(fma.f64 (sin.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1)) (sin.f64 (neg.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1)) (sin.f64 (neg.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1)) (sin.f64 (neg.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (neg.f64 (cos.f64 phi2))) (sin.f64 phi1) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1)) (sin.f64 (neg.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 (neg.f64 phi1))) (cos.f64 phi2) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1)) (sin.f64 (neg.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1)) (sin.f64 (neg.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1)) (sin.f64 (neg.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (sin.f64 (neg.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (sin.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (neg.f64 phi1))) (cos.f64 phi2) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 (neg.f64 phi1)) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (neg.f64 (cos.f64 phi2)) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2))))
(neg.f64 (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(*.f64 (-.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(*.f64 (+.f64 (sin.f64 (-.f64 phi2 (fabs.f64 phi1))) (sin.f64 (+.f64 (fabs.f64 phi1) phi2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(+.f64 (/.f64 (sin.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) #s(literal 1 binary64)) (sin.f64 phi2)))
(+.f64 (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 0 binary64))) (*.f64 (sin.f64 phi2) (*.f64 (cos.f64 phi1) #s(literal 1 binary64))))
(+.f64 (/.f64 (sin.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(+.f64 (/.f64 (sin.f64 (-.f64 phi2 (fabs.f64 phi1))) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 (fabs.f64 phi1) phi2)) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (sin.f64 (neg.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))
(/.f64 (-.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi2 (fabs.f64 phi1))) (sin.f64 (+.f64 (fabs.f64 phi1) phi2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2)) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))) phi2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1)) phi2)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1)) phi2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 (+.f64 (fabs.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 phi2 (+.f64 (fabs.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1)))) (cos.f64 (+.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi2 (fabs.f64 phi1))) (sin.f64 (+.f64 (fabs.f64 phi1) phi2)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1))))) (neg.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (sin.f64 phi2) (*.f64 (*.f64 (cos.f64 phi1) #s(literal 1 binary64)) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi2) (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (*.f64 (sin.f64 phi2) (*.f64 (cos.f64 phi1) #s(literal 1 binary64))))
(fma.f64 (sin.f64 (+.f64 phi2 phi1)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))
(+.f64 (*.f64 (cos.f64 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) #s(literal 0 binary64)))
(+.f64 (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (fabs.f64 phi1)) #s(literal 0 binary64)) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(-.f64 (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (neg.f64 (*.f64 (cos.f64 phi1) #s(literal 1 binary64))))
(-.f64 (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (*.f64 (neg.f64 (cos.f64 phi1)) #s(literal 1 binary64)))
(-.f64 (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 (neg.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(cos.f64 phi1)
(cos.f64 (fabs.f64 phi1))
(cos.f64 (neg.f64 phi1))
(cos.f64 (neg.f64 (fabs.f64 phi1)))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 phi1))))
(fma.f64 (sin.f64 (fabs.f64 phi1)) #s(literal 0 binary64) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(fma.f64 (cos.f64 phi1) #s(literal 1 binary64) (*.f64 (sin.f64 phi1) #s(literal 0 binary64)))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi1) (*.f64 (sin.f64 phi1) #s(literal 0 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 phi1) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(sin.f64 (+.f64 (fabs.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1)))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (/.f64 (PI.f64) #s(literal 2 binary64))))
phi1
(neg.f64 (neg.f64 phi1))
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(*.f64 (sin.f64 (neg.f64 phi1)) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(*.f64 (sin.f64 phi1) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (*.f64 (*.f64 (sin.f64 phi2) #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (*.f64 (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (/.f64 (sin.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) #s(literal 0 binary64))) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) #s(literal 1 binary64))))
(+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (sin.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(+.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 (neg.f64 phi1)))) (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1)) (sin.f64 (neg.f64 phi1)))))
(-.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1)) (sin.f64 (neg.f64 phi1))))
(-.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 (fabs.f64 phi2))) (sin.f64 (+.f64 (fabs.f64 phi2) phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (sin.f64 (neg.f64 (+.f64 phi2 phi1))) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) (sin.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 (fabs.f64 phi2) (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 (fabs.f64 phi2) (-.f64 lambda1 lambda2)))) (sin.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 phi1 (fabs.f64 phi2))) (sin.f64 (+.f64 (fabs.f64 phi2) phi1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 (-.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1))))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (sin.f64 (neg.f64 (+.f64 phi2 phi1))) (sin.f64 (-.f64 phi1 phi2)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (sin.f64 phi1) (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 phi1) (+.f64 (cos.f64 (-.f64 (fabs.f64 phi2) (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 (fabs.f64 phi2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (cos.f64 (+.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (fabs.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 phi2) (fabs.f64 (-.f64 lambda2 lambda1))))) (sin.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 phi2) (fabs.f64 (-.f64 lambda2 lambda1))))) (sin.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) phi2)) (cos.f64 (-.f64 phi2 (fabs.f64 (-.f64 lambda2 lambda1))))) (sin.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 phi1) (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))) (cos.f64 (+.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 phi1) (+.f64 (cos.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (fabs.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 phi2) (fabs.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 phi1) (+.f64 (cos.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 phi2) (fabs.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 phi1) (+.f64 (cos.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) phi2)) (cos.f64 (-.f64 phi2 (fabs.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2)))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2)))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (sin.f64 phi2) #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
(fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (/.f64 (sin.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) #s(literal 0 binary64)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) #s(literal 1 binary64))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (sin.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(neg.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 phi1))
(*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 (neg.f64 phi1)))
(*.f64 (sin.f64 (neg.f64 phi1)) (neg.f64 (cos.f64 phi2)))
(*.f64 (neg.f64 (sin.f64 (neg.f64 phi1))) (cos.f64 phi2))
(*.f64 (neg.f64 (neg.f64 (cos.f64 phi2))) (sin.f64 phi1))
(*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 (neg.f64 phi1))))
(*.f64 (sin.f64 phi1) (neg.f64 (neg.f64 (cos.f64 phi2))))
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))))
(*.f64 (+.f64 (sin.f64 (-.f64 phi1 (fabs.f64 phi2))) (sin.f64 (+.f64 (fabs.f64 phi2) phi1))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(*.f64 (-.f64 (sin.f64 (neg.f64 (+.f64 phi2 phi1))) (sin.f64 (-.f64 phi1 phi2))) (/.f64 #s(literal 1 binary64) (neg.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sin.f64 (/.f64 (-.f64 phi1 (-.f64 phi2 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi1 phi2) phi2) phi1) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 phi1 (-.f64 phi2 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 phi1 phi2) phi2) phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(+.f64 (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(+.f64 (/.f64 (sin.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (sin.f64 phi2) #s(literal 0 binary64)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) #s(literal 1 binary64)) (sin.f64 phi1)))
(+.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi2) #s(literal 0 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1 binary64))))
(+.f64 (/.f64 (sin.f64 (-.f64 phi1 (fabs.f64 phi2))) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 (fabs.f64 phi2) phi1)) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (sin.f64 (neg.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))
(-.f64 (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (neg.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))
(-.f64 (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (neg.f64 (/.f64 (sin.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))))
(/.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (neg.f64 (neg.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (fabs.f64 phi2))) (sin.f64 (+.f64 (fabs.f64 phi2) phi1))) #s(literal 2 binary64))
(/.f64 (fma.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sin.f64 (+.f64 phi2 phi1)))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (fma.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64) (*.f64 (sin.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (-.f64 (sin.f64 (neg.f64 (+.f64 phi2 phi1))) (sin.f64 (-.f64 phi1 phi2))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) #s(literal 2 binary64) (sin.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1)) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)) phi1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (fabs.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (+.f64 phi1 (+.f64 (fabs.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (cos.f64 (+.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 (fabs.f64 phi2))) (sin.f64 (+.f64 (fabs.f64 phi2) phi1)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1))))) (neg.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 (sin.f64 phi2) #s(literal 0 binary64)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) #s(literal 1 binary64)) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (*.f64 (sin.f64 phi2) #s(literal 0 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) #s(literal 1 binary64))))
(fma.f64 (sin.f64 (-.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(fma.f64 (sin.f64 (+.f64 phi2 phi1)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))
(neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)))
(sin.f64 phi1)
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 (neg.f64 lambda2))))
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 lambda2)))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 (fabs.f64 (-.f64 lambda2 lambda1))) #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (neg.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 (neg.f64 lambda1))) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (cos.f64 lambda1) (sin.f64 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(-.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (neg.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(-.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64))))
(-.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1 binary64)))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (fabs.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 (fabs.f64 (-.f64 lambda2 lambda1))) #s(literal 0 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 (neg.f64 lambda2))))
(fma.f64 (sin.f64 lambda1) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 (neg.f64 lambda2))))
(fma.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) #s(literal 0 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 (neg.f64 lambda2))))
(fma.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (neg.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2))))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (neg.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 (neg.f64 lambda1))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 (neg.f64 lambda1))) (sin.f64 lambda2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 (neg.f64 lambda1))) (sin.f64 lambda2)))
(neg.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))))
(sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1)))
(sin.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))) (/.f64 (PI.f64) #s(literal 2 binary64))))

eval123.0ms (0.5%)

Memory
-28.7MiB live, 71.0MiB allocated; 23ms collecting garbage
Compiler

Compiled 7 024 to 2 494 computations (64.5% saved)

prune103.0ms (0.4%)

Memory
14.1MiB live, 60.9MiB allocated; 5ms collecting garbage
Pruning

52 alts after pruning (52 fresh and 0 done)

PrunedKeptTotal
New45052502
Fresh000
Picked101
Done000
Total45152503
Accuracy
88.9%
Counts
503 → 52
Alt Table
Click to see full alt table
StatusAccuracyProgram
88.3%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
21.2%
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
42.3%
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
88.3%
(atan2.f64 (+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
79.3%
(atan2.f64 (*.f64 (fma.f64 (+.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
88.3%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
88.3%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
88.3%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
48.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (cos.f64 (-.f64 lambda1 lambda2)))))
46.7%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
76.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
76.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
32.7%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
65.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
33.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
76.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
76.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda1) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
59.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))))
59.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
63.6%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
66.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
69.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
45.6%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
50.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1))))) (cos.f64 (-.f64 lambda1 lambda2)))))
48.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
65.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
66.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))))
45.7%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
50.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
64.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
45.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
45.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
46.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
48.0%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
46.0%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
47.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
44.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
42.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
45.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
16.4%
(atan2.f64 (*.f64 (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (PI.f64))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
64.2%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))))
67.2%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
41.0%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))))))
23.7%
(atan2.f64 (*.f64 (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
54.5%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
63.7%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (sin.f64 lambda1))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
62.3%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
40.9%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
53.6%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
49.9%
(atan2.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 lambda1 lambda2) (-.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
42.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
44.1%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Compiler

Compiled 2 734 to 2 472 computations (9.6% saved)

series987.0ms (3.8%)

Memory
8.0MiB live, 292.9MiB allocated; 117ms collecting garbage
Counts
53 → 223
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(sin.f64 lambda1)
lambda1
(cos.f64 lambda2)
lambda2
(*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(sin.f64 lambda2)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2))
#s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
(*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))
#s(literal 1 binary64)
(*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))
#s(literal -1/6 binary64)
(pow.f64 phi1 #s(literal 2 binary64))
#s(literal 2 binary64)
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1)))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
(neg.f64 phi1)
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))
(+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))
(*.f64 lambda2 (sin.f64 lambda1))
Outputs
#s(approx (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
#s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2)))
#s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2))))
#s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2)))))))
#s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 lambda2)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))))))))
#s(approx (sin lambda1) lambda1)
#s(approx (sin lambda1) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))))
#s(approx (sin lambda1) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin lambda1) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2)))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (sin.f64 lambda2) (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2)))))))))
#s(approx (neg (cos lambda1)) #s(literal -1 binary64))
#s(approx (neg (cos lambda1)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1 binary64)))
#s(approx (neg (cos lambda1)) (-.f64 (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/24 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) #s(literal 1 binary64)))
#s(approx (neg (cos lambda1)) (-.f64 (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/720 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/24 binary64))))) #s(literal 1 binary64)))
#s(approx (cos lambda1) #s(literal 1 binary64))
#s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))
#s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda1 (-.f64 (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2))))))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2))))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (-.f64 (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2))))))
#s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (- lambda1 lambda2) (-.f64 lambda1 lambda2))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda1 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2)))
#s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))
#s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
#s(approx (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))
#s(approx (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))) (*.f64 (sin.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))
#s(approx (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))))) (*.f64 (sin.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))
#s(approx (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda1 (-.f64 (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))))) (*.f64 (sin.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))
#s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))
#s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 (+.f64 lambda2 (*.f64 #s(literal -1/2 binary64) lambda1)))))
#s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 (+.f64 lambda2 (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))
#s(approx (* lambda2 (sin lambda1)) (*.f64 lambda1 lambda2))
#s(approx (* lambda2 (sin lambda1)) (*.f64 lambda1 (+.f64 lambda2 (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) lambda2)))))
#s(approx (* lambda2 (sin lambda1)) (*.f64 lambda1 (+.f64 lambda2 (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) lambda2 (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) lambda2)))))))
#s(approx (* lambda2 (sin lambda1)) (*.f64 lambda1 (+.f64 lambda2 (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) lambda2 (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) lambda2) (*.f64 #s(literal 1/120 binary64) lambda2))))))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))))
#s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
#s(approx (sin lambda1) (sin.f64 lambda1))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
#s(approx (neg (cos lambda1)) (*.f64 #s(literal -1 binary64) (cos.f64 lambda1)))
#s(approx (cos lambda1) (cos.f64 lambda1))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (- lambda1 lambda2) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
#s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))
#s(approx (* lambda2 (sin lambda1)) (*.f64 lambda2 (sin.f64 lambda1)))
#s(approx (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 phi1))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 phi1))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 phi1))))))
#s(approx (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 phi1)))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (fma.f64 #s(literal -1 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1)))))
#s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (sin.f64 lambda1)))))))
#s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (cos.f64 lambda1)))))))))
#s(approx (cos lambda2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 2 binary64)))))
#s(approx (cos lambda2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos lambda2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx lambda2 lambda2)
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 lambda1))))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 lambda1)) (*.f64 #s(literal 1/6 binary64) (cos.f64 lambda1)))))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (cos.f64 lambda1) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (cos.f64 lambda1) (*.f64 #s(literal 1/5040 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 lambda1))))))))))
#s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))))
#s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda2 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda2 (-.f64 (*.f64 lambda2 (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1))))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (-.f64 (*.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (sin.f64 lambda1))))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1))))))
#s(approx (- lambda1 lambda2) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))) (*.f64 (sin.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda2 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))) (*.f64 (sin.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda2 (-.f64 (*.f64 lambda2 (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))) (*.f64 (sin.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (cos lambda2) (cos.f64 lambda2))
#s(approx (sin lambda2) (sin.f64 lambda2))
#s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))
#s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (/.f64 (cos.f64 lambda1) lambda2))))
#s(approx (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (sin.f64 phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (sin.f64 phi1))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))
#s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (sin.f64 phi1))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (sin.f64 phi1))))))
#s(approx (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (sin.f64 phi1)))))
#s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda1) lambda2))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi2) (*.f64 #s(literal 1/6 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (* (cos phi1) (sin phi2)) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 phi2)))))
#s(approx (* (cos phi1) (sin phi2)) (+.f64 (sin.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi2) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 phi2)))))))
#s(approx (* (cos phi1) (sin phi2)) (+.f64 (sin.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 phi2)) (*.f64 #s(literal 1/24 binary64) (sin.f64 phi2))))))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx phi1 phi1)
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 phi1 (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 phi1 (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 phi1 (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
#s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2)))
#s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (+.f64 (cos.f64 phi2) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 phi2))))))
#s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (+.f64 (cos.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi2) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 phi2))))))))
#s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (+.f64 (cos.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 phi2)) (*.f64 #s(literal 1/120 binary64) (cos.f64 phi2)))))))))
#s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
#s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (+ 1 (* -1/6 (pow phi1 2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (* -1/6 (pow phi1 2)) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))
#s(approx (pow phi1 2) (pow.f64 phi1 #s(literal 2 binary64)))
#s(approx (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (sin.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (fma.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))) (*.f64 (sin.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (fma.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (sin.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (sin.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (fma.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2)) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 phi1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi2))))))) (*.f64 (sin.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (+ (/ (PI) 2) (neg phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (/ (PI) 2) (neg phi1))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ (/ (PI) 2) (neg phi1))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (sin (+ (/ (PI) 2) (neg phi1))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/6 binary64) (*.f64 phi1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (+ (/ (PI) 2) (neg phi1)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (+ (/ (PI) 2) (neg phi1)) (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (neg phi1) (*.f64 #s(literal -1 binary64) phi1))
#s(approx (* (cos phi1) (sin phi2)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
#s(approx (cos phi1) (cos.f64 phi1))
#s(approx (* (sin phi1) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))
#s(approx (sin phi1) (sin.f64 phi1))
#s(approx (* phi1 (+ 1 (* -1/6 (pow phi1 2)))) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 3 binary64))))
#s(approx (* phi1 (+ 1 (* -1/6 (pow phi1 2)))) (*.f64 (pow.f64 phi1 #s(literal 3 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/6 binary64))))
#s(approx (+ 1 (* -1/6 (pow phi1 2))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/6 binary64))))
#s(approx (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (*.f64 (sin.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))
#s(approx (sin (+ (/ (PI) 2) (neg phi1))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))
#s(approx (+ (/ (PI) 2) (neg phi1)) (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi1)) #s(literal 1 binary64))))
#s(approx (* phi1 (+ 1 (* -1/6 (pow phi1 2)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 phi1 #s(literal 3 binary64)) (-.f64 #s(literal 1/6 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
#s(approx (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
#s(approx (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (*.f64 (sin.f64 phi2) (sin.f64 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (+ (/ (PI) 2) (neg phi1))) (sin.f64 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (/ (PI) 2) (neg phi1)) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) phi1))))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))))))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))))))))))
#s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))
#s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx phi2 phi2)
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 phi2 (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 (cos.f64 phi1))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
#s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1)))
#s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 phi1))))))
#s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 phi1))))))))
#s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 phi1)) (*.f64 #s(literal 1/120 binary64) (cos.f64 phi1)))))))))
#s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))
#s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))))))
#s(approx (* (sin phi1) (cos phi2)) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1)))))
#s(approx (* (sin phi1) (cos phi2)) (+.f64 (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1)))))))
#s(approx (* (sin phi1) (cos phi2)) (+.f64 (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1)) (*.f64 #s(literal 1/24 binary64) (sin.f64 phi1))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/24 binary64) (sin.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
#s(approx (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
#s(approx (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 phi2 (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
#s(approx (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (*.f64 phi2 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))
#s(approx (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (*.f64 phi2 (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))))
#s(approx (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (*.f64 phi2 (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))))))
#s(approx (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (*.f64 phi2 (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (*.f64 #s(literal 1/120 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))))))))
#s(approx (cos phi2) (cos.f64 phi2))
Calls

12 calls:

TimeVariablePointExpression
36.0ms
phi2
@inf
((atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin lambda1) lambda1 (cos lambda2) lambda2 (* (neg (cos lambda1)) (sin lambda2)) (neg (cos lambda1)) (cos lambda1) (sin lambda2) (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (cos phi2)) (sin phi1) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (cos phi2)) (sin phi1) (* phi1 (+ 1 (* -1/6 (pow phi1 2)))) (+ 1 (* -1/6 (pow phi1 2))) 1 (* -1/6 (pow phi1 2)) -1/6 (pow phi1 2) 2 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (sin (+ (/ (PI) 2) (neg phi1))) (+ (/ (PI) 2) (neg phi1)) (/ (PI) 2) (PI) (neg phi1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (cos lambda1) (* lambda2 (sin lambda1))) (* lambda2 (sin lambda1)))
12.0ms
phi1
@inf
((atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin lambda1) lambda1 (cos lambda2) lambda2 (* (neg (cos lambda1)) (sin lambda2)) (neg (cos lambda1)) (cos lambda1) (sin lambda2) (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (cos phi2)) (sin phi1) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (cos phi2)) (sin phi1) (* phi1 (+ 1 (* -1/6 (pow phi1 2)))) (+ 1 (* -1/6 (pow phi1 2))) 1 (* -1/6 (pow phi1 2)) -1/6 (pow phi1 2) 2 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (sin (+ (/ (PI) 2) (neg phi1))) (+ (/ (PI) 2) (neg phi1)) (/ (PI) 2) (PI) (neg phi1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (cos lambda1) (* lambda2 (sin lambda1))) (* lambda2 (sin lambda1)))
9.0ms
phi2
@-inf
((atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin lambda1) lambda1 (cos lambda2) lambda2 (* (neg (cos lambda1)) (sin lambda2)) (neg (cos lambda1)) (cos lambda1) (sin lambda2) (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (cos phi2)) (sin phi1) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (cos phi2)) (sin phi1) (* phi1 (+ 1 (* -1/6 (pow phi1 2)))) (+ 1 (* -1/6 (pow phi1 2))) 1 (* -1/6 (pow phi1 2)) -1/6 (pow phi1 2) 2 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (sin (+ (/ (PI) 2) (neg phi1))) (+ (/ (PI) 2) (neg phi1)) (/ (PI) 2) (PI) (neg phi1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (cos lambda1) (* lambda2 (sin lambda1))) (* lambda2 (sin lambda1)))
7.0ms
lambda2
@-inf
((atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin lambda1) lambda1 (cos lambda2) lambda2 (* (neg (cos lambda1)) (sin lambda2)) (neg (cos lambda1)) (cos lambda1) (sin lambda2) (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (cos phi2)) (sin phi1) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (cos phi2)) (sin phi1) (* phi1 (+ 1 (* -1/6 (pow phi1 2)))) (+ 1 (* -1/6 (pow phi1 2))) 1 (* -1/6 (pow phi1 2)) -1/6 (pow phi1 2) 2 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (sin (+ (/ (PI) 2) (neg phi1))) (+ (/ (PI) 2) (neg phi1)) (/ (PI) 2) (PI) (neg phi1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (cos lambda1) (* lambda2 (sin lambda1))) (* lambda2 (sin lambda1)))
6.0ms
lambda2
@inf
((atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin lambda1) lambda1 (cos lambda2) lambda2 (* (neg (cos lambda1)) (sin lambda2)) (neg (cos lambda1)) (cos lambda1) (sin lambda2) (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (cos phi2)) (sin phi1) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (sin phi1) (cos phi2)) (sin phi1) (* phi1 (+ 1 (* -1/6 (pow phi1 2)))) (+ 1 (* -1/6 (pow phi1 2))) 1 (* -1/6 (pow phi1 2)) -1/6 (pow phi1 2) 2 (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (- (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (sin (+ (/ (PI) 2) (neg phi1))) (sin phi2)) (sin (+ (/ (PI) 2) (neg phi1))) (+ (/ (PI) 2) (neg phi1)) (/ (PI) 2) (PI) (neg phi1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (+ (cos lambda1) (* lambda2 (sin lambda1))) (* lambda2 (sin lambda1)))

rewrite909.0ms (3.5%)

Memory
-0.6MiB live, 281.8MiB allocated; 73ms collecting garbage
Counts
53 → 375
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(sin.f64 lambda1)
lambda1
(cos.f64 lambda2)
lambda2
(*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(sin.f64 lambda2)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2))
#s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
(*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))
#s(literal 1 binary64)
(*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))
#s(literal -1/6 binary64)
(pow.f64 phi1 #s(literal 2 binary64))
#s(literal 2 binary64)
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1)))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
(neg.f64 phi1)
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))
(+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))
(*.f64 lambda2 (sin.f64 lambda1))
Outputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (fabs.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))) (neg.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(+.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (neg.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(fma.f64 (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(neg.f64 (sin.f64 (-.f64 lambda2 lambda1)))
(neg.f64 (-.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin.f64 lambda1)
lambda1
(+.f64 (*.f64 (sin.f64 lambda2) #s(literal 0 binary64)) (*.f64 (cos.f64 lambda2) #s(literal 1 binary64)))
(cos.f64 lambda2)
(cos.f64 (fabs.f64 lambda2))
(cos.f64 (neg.f64 lambda2))
(cos.f64 (fabs.f64 (fabs.f64 lambda2)))
(cos.f64 (neg.f64 (fabs.f64 lambda2)))
(cos.f64 (neg.f64 (neg.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) #s(literal 0 binary64) (*.f64 (cos.f64 lambda2) #s(literal 1 binary64)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))
(sin.f64 (+.f64 (fabs.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
lambda2
(*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))
(*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))
(*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 lambda1 (PI.f64)))) (sin.f64 (+.f64 lambda2 (+.f64 lambda1 (PI.f64))))) #s(literal 2 binary64))
(neg.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (PI.f64))) (*.f64 (sin.f64 lambda1) (sin.f64 (PI.f64))))
(cos.f64 (+.f64 lambda1 (PI.f64)))
(cos.f64 (+.f64 (fabs.f64 lambda1) (PI.f64)))
(cos.f64 (+.f64 (neg.f64 lambda1) (PI.f64)))
(cos.f64 (fabs.f64 (+.f64 lambda1 (PI.f64))))
(cos.f64 (neg.f64 (+.f64 lambda1 (PI.f64))))
(cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(neg.f64 (cos.f64 lambda1))
(sin.f64 (+.f64 (+.f64 lambda1 (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (PI.f64)))
(sin.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)))
(+.f64 (*.f64 (sin.f64 lambda1) #s(literal 0 binary64)) (*.f64 (cos.f64 lambda1) #s(literal 1 binary64)))
(cos.f64 lambda1)
(cos.f64 (fabs.f64 lambda1))
(cos.f64 (neg.f64 lambda1))
(cos.f64 (+.f64 (+.f64 lambda1 (PI.f64)) (PI.f64)))
(cos.f64 (fabs.f64 (fabs.f64 lambda1)))
(cos.f64 (neg.f64 (fabs.f64 lambda1)))
(cos.f64 (neg.f64 (neg.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) #s(literal 0 binary64) (*.f64 (cos.f64 lambda1) #s(literal 1 binary64)))
(neg.f64 (neg.f64 (cos.f64 lambda1)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1))
(sin.f64 (+.f64 (fabs.f64 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 lambda2)
(+.f64 (*.f64 (sin.f64 phi2) #s(literal 0 binary64)) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(cos.f64 phi2)
(cos.f64 (fabs.f64 phi2))
(cos.f64 (neg.f64 phi2))
(cos.f64 (fabs.f64 (fabs.f64 phi2)))
(cos.f64 (neg.f64 (fabs.f64 phi2)))
(cos.f64 (neg.f64 (neg.f64 phi2)))
(fma.f64 (sin.f64 phi2) #s(literal 0 binary64) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(sin.f64 (+.f64 (fabs.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
phi2
(+.f64 (*.f64 (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (neg.f64 (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (neg.f64 (*.f64 (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 (neg.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 phi1) (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(neg.f64 (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (sin.f64 phi2)))
(+.f64 (*.f64 (sin.f64 phi2) (*.f64 (cos.f64 phi1) #s(literal 1 binary64))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64))))
(-.f64 (/.f64 (cos.f64 (-.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(/.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi2 (neg.f64 phi1))) (sin.f64 (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi2 (fabs.f64 phi1))) (sin.f64 (+.f64 phi2 (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))))) (neg.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 (cos.f64 phi1) #s(literal 1 binary64)) (sin.f64 phi2) (*.f64 (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi2) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64))))
(+.f64 (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(+.f64 (*.f64 (cos.f64 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)))
(-.f64 (*.f64 (cos.f64 phi1) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(-.f64 (*.f64 (cos.f64 phi1) #s(literal 1 binary64)) (*.f64 (neg.f64 #s(literal 0 binary64)) (sin.f64 (neg.f64 phi1))))
(-.f64 (*.f64 (cos.f64 phi1) #s(literal 1 binary64)) (neg.f64 (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64))))
(cos.f64 phi1)
(cos.f64 (fabs.f64 phi1))
(cos.f64 (neg.f64 phi1))
(cos.f64 (fabs.f64 (fabs.f64 phi1)))
(cos.f64 (neg.f64 (fabs.f64 phi1)))
(fma.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 phi1)) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)))
(fma.f64 (cos.f64 phi1) #s(literal 1 binary64) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)))
(sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(sin.f64 (+.f64 (fabs.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
phi1
(*.f64 phi1 #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) phi1)
(neg.f64 (neg.f64 phi1))
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 phi1))
(*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(+.f64 (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (fabs.f64 phi2))) (sin.f64 (+.f64 phi1 (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(sin.f64 phi1)
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (neg.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (fabs.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (fabs.f64 (fabs.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (fabs.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (neg.f64 lambda2) lambda1)
(+.f64 lambda1 (neg.f64 lambda2))
(-.f64 lambda1 lambda2)
(-.f64 lambda1 (neg.f64 (neg.f64 lambda2)))
(neg.f64 (-.f64 lambda2 lambda1))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (sin phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (sin.f64 phi2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (fabs.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))) (neg.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(+.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (neg.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(fma.f64 (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(neg.f64 (sin.f64 (-.f64 lambda2 lambda1)))
(neg.f64 (-.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
#s(approx (- (* (cos phi1) (sin phi2)) (* (sin phi1) (* (cos phi2) (cos (- lambda1 lambda2))))) (sin.f64 phi2))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (fma.f64 (*.f64 phi1 #s(literal -1/6 binary64)) (*.f64 phi1 phi1) phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (fma.f64 (*.f64 phi1 #s(literal -1/6 binary64)) (*.f64 phi1 phi1) phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (*.f64 #s(approx (sin phi1) (fma.f64 (*.f64 phi1 #s(literal -1/6 binary64)) (*.f64 phi1 phi1) phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 #s(approx (sin phi1) (fma.f64 (*.f64 phi1 #s(literal -1/6 binary64)) (*.f64 phi1 phi1) phi1)) (cos.f64 phi2))
#s(approx (sin phi1) (fma.f64 (*.f64 phi1 #s(literal -1/6 binary64)) (*.f64 phi1 phi1) phi1))
(*.f64 phi1 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)))
(*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi1)
(+.f64 (*.f64 (*.f64 phi1 #s(literal -1/6 binary64)) (*.f64 phi1 phi1)) phi1)
(+.f64 phi1 (*.f64 (*.f64 phi1 #s(literal -1/6 binary64)) (*.f64 phi1 phi1)))
(-.f64 phi1 (neg.f64 (*.f64 (*.f64 phi1 #s(literal -1/6 binary64)) (*.f64 phi1 phi1))))
(-.f64 phi1 (*.f64 (neg.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) phi1))
(-.f64 phi1 (*.f64 (neg.f64 phi1) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))))
(fma.f64 (*.f64 phi1 #s(literal -1/6 binary64)) (*.f64 phi1 phi1) phi1)
(fma.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -1/6 binary64) phi1) phi1)
(fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) phi1 phi1)
(fma.f64 (*.f64 phi1 (*.f64 phi1 phi1)) #s(literal -1/6 binary64) phi1)
(fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 phi1 phi1) phi1) phi1)
(fma.f64 phi1 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) phi1)
(fma.f64 phi1 #s(literal 1 binary64) (*.f64 (*.f64 phi1 #s(literal -1/6 binary64)) (*.f64 phi1 phi1)))
(fma.f64 #s(literal 1 binary64) phi1 (*.f64 (*.f64 phi1 #s(literal -1/6 binary64)) (*.f64 phi1 phi1)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)))
(+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)))))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (neg.f64 #s(literal -1/6 binary64))) (*.f64 phi1 phi1)))
(-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) (neg.f64 #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (neg.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))))
(fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 #s(literal 1 binary64))
(fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64))
(fma.f64 phi1 (*.f64 phi1 #s(literal -1/6 binary64)) #s(literal 1 binary64))
(neg.f64 (-.f64 (neg.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) #s(literal 1 binary64)))
#s(literal 1 binary64)
(fabs.f64 #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) #s(literal 0 binary64))
(/.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 #s(literal 0 binary64)))) #s(literal 2 binary64))
(cosh.f64 #s(literal 0 binary64))
(cosh.f64 (neg.f64 #s(literal 0 binary64)))
(exp.f64 #s(literal 0 binary64))
(sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))
(*.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64))
(*.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1)
(*.f64 phi1 (*.f64 phi1 #s(literal -1/6 binary64)))
#s(literal -1/6 binary64)
(*.f64 phi1 phi1)
(*.f64 (fabs.f64 phi1) (fabs.f64 phi1))
(*.f64 (neg.f64 phi1) (neg.f64 phi1))
(pow.f64 phi1 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 #s(literal 2 binary64) #s(literal 1 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (cosh.f64 (/.f64 (+.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 2 binary64))) (cosh.f64 (/.f64 (-.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 2 binary64)))))
(+.f64 #s(literal 1 binary64) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (neg.f64 #s(literal 1 binary64)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (neg.f64 (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (neg.f64 (*.f64 (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 (neg.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 phi1) (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 (neg.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(neg.f64 (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (sin.f64 phi2)))
(+.f64 (*.f64 (sin.f64 phi2) (*.f64 (cos.f64 phi1) #s(literal 1 binary64))) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64))))
(-.f64 (/.f64 (cos.f64 (-.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(/.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi2 (neg.f64 phi1))) (sin.f64 (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi2 (fabs.f64 phi1))) (sin.f64 (+.f64 phi2 (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 phi1 phi2))))) (neg.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 (cos.f64 phi1) #s(literal 1 binary64)) (sin.f64 phi2) (*.f64 (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi2) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 phi2) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64))))
(+.f64 (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(+.f64 (*.f64 (cos.f64 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)))
(-.f64 (*.f64 (cos.f64 phi1) #s(literal 1 binary64)) (*.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(-.f64 (*.f64 (cos.f64 phi1) #s(literal 1 binary64)) (*.f64 (neg.f64 #s(literal 0 binary64)) (sin.f64 (neg.f64 phi1))))
(-.f64 (*.f64 (cos.f64 phi1) #s(literal 1 binary64)) (neg.f64 (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64))))
(cos.f64 phi1)
(cos.f64 (fabs.f64 phi1))
(cos.f64 (neg.f64 phi1))
(cos.f64 (fabs.f64 (fabs.f64 phi1)))
(cos.f64 (neg.f64 (fabs.f64 phi1)))
(fma.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(fma.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 phi1)) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)))
(fma.f64 (cos.f64 phi1) #s(literal 1 binary64) (*.f64 (sin.f64 (neg.f64 phi1)) #s(literal 0 binary64)))
(sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(sin.f64 (+.f64 (fabs.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))
(+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)
(-.f64 (neg.f64 phi1) (neg.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (neg.f64 phi1) (*.f64 (neg.f64 (PI.f64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(/.f64 (fma.f64 (neg.f64 phi1) (neg.f64 #s(literal 2 binary64)) (neg.f64 (PI.f64))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 (neg.f64 phi1) #s(literal 2 binary64) (PI.f64)) #s(literal 2 binary64))
(fma.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (PI.f64) (neg.f64 phi1))
(fma.f64 (PI.f64) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (neg.f64 phi1))
(fma.f64 (neg.f64 (PI.f64)) (/.f64 #s(literal 1 binary64) (neg.f64 #s(literal 2 binary64))) (neg.f64 phi1))
(neg.f64 (-.f64 phi1 (/.f64 (PI.f64) #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (PI.f64))
(*.f64 (PI.f64) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(*.f64 (neg.f64 (PI.f64)) (/.f64 #s(literal 1 binary64) (neg.f64 #s(literal 2 binary64))))
(/.f64 (PI.f64) #s(literal 2 binary64))
(/.f64 (*.f64 (PI.f64) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (neg.f64 (PI.f64)) (neg.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (PI.f64))) (neg.f64 (neg.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (neg.f64 (PI.f64)) #s(literal 2 binary64)))
(neg.f64 (/.f64 (PI.f64) (neg.f64 #s(literal 2 binary64))))
(PI.f64)
(neg.f64 phi1)
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))
(+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))
(+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))
(+.f64 (cos.f64 lambda1) (neg.f64 (*.f64 (neg.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (cos.f64 lambda1) (*.f64 (neg.f64 (neg.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 lambda2 (sin.f64 lambda1)) (neg.f64 (cos.f64 lambda1)))
(-.f64 (cos.f64 lambda1) (*.f64 (neg.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(fma.f64 lambda2 (sin.f64 lambda1) (cos.f64 lambda1))
(neg.f64 (-.f64 (*.f64 (neg.f64 lambda2) (sin.f64 lambda1)) (cos.f64 lambda1)))
(*.f64 lambda2 (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) lambda2)

eval181.0ms (0.7%)

Memory
2.7MiB live, 183.9MiB allocated; 56ms collecting garbage
Compiler

Compiled 12 021 to 3 905 computations (67.5% saved)

prune151.0ms (0.6%)

Memory
9.5MiB live, 155.2MiB allocated; 30ms collecting garbage
Pruning

71 alts after pruning (70 fresh and 1 done)

PrunedKeptTotal
New85940899
Fresh173047
Picked415
Done000
Total88071951
Accuracy
99.7%
Counts
951 → 71
Alt Table
Click to see full alt table
StatusAccuracyProgram
88.3%
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
21.2%
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
42.3%
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
88.3%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
79.6%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
56.7%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 lambda1 (PI.f64)))) (sin.f64 (+.f64 lambda2 (+.f64 lambda1 (PI.f64))))) #s(literal 2 binary64))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
99.7%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
99.7%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
99.7%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
71.4%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
71.6%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
76.5%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))))
79.6%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
56.4%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))))))
68.0%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
65.8%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1)))))))))
78.4%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
59.1%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
77.2%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
81.2%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
61.8%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
59.0%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
51.3%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
59.1%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
62.6%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) #s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
78.5%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
88.3%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
48.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (cos.f64 (-.f64 lambda1 lambda2)))))
46.7%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
28.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
45.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
29.6%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
76.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
76.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
63.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
76.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
76.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda1) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
59.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))))
59.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
63.6%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
69.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
53.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))))))
48.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
65.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
66.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))))
50.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
64.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
45.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
39.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
45.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
48.0%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
46.0%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
47.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
27.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
28.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
24.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
45.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
25.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
26.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
16.4%
(atan2.f64 (*.f64 (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (PI.f64))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
40.6%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
67.2%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
42.6%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
41.0%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))))))
23.7%
(atan2.f64 (*.f64 (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
35.5%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
35.8%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
40.9%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
29.2%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
53.6%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
42.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Compiler

Compiled 3 875 to 3 583 computations (7.5% saved)

series1.5s (5.6%)

Memory
-10.4MiB live, 379.2MiB allocated; 66ms collecting garbage
Counts
56 → 275
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(sin.f64 lambda1)
lambda1
(cos.f64 lambda2)
lambda2
(*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(sin.f64 lambda2)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
#s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64))))
#s(literal 1 binary64)
(*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))
#s(literal -1/2 binary64)
(pow.f64 phi2 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1)))
(*.f64 phi2 (cos.f64 phi1))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))
(cos.f64 (neg.f64 lambda2))
(neg.f64 lambda2)
Outputs
#s(approx (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))) (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
#s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2)))
#s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2))))
#s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2)))))))
#s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 lambda2)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))))))))
#s(approx (sin lambda1) lambda1)
#s(approx (sin lambda1) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))))
#s(approx (sin lambda1) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin lambda1) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2)))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (sin.f64 lambda2) (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2)))))))))
#s(approx (neg (cos lambda1)) #s(literal -1 binary64))
#s(approx (neg (cos lambda1)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1 binary64)))
#s(approx (neg (cos lambda1)) (-.f64 (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/24 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) #s(literal 1 binary64)))
#s(approx (neg (cos lambda1)) (-.f64 (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/720 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/24 binary64))))) #s(literal 1 binary64)))
#s(approx (cos lambda1) #s(literal 1 binary64))
#s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))
#s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (-.f64 (fma.f64 lambda1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (-.f64 (fma.f64 lambda1 (-.f64 (*.f64 lambda1 (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (fma.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2)))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (sin.f64 lambda2)))))))))
#s(approx (* (sin lambda1) (sin lambda2)) (*.f64 lambda1 (sin.f64 lambda2)))
#s(approx (* (sin lambda1) (sin lambda2)) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2))))))
#s(approx (* (sin lambda1) (sin lambda2)) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 lambda2) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2))))))))
#s(approx (* (sin lambda1) (sin lambda2)) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 lambda2) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2)) (*.f64 #s(literal 1/120 binary64) (sin.f64 lambda2)))))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda1 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2)))
#s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))
#s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))))))))
#s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (- lambda1 lambda2) (-.f64 lambda1 lambda2))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda1 (-.f64 (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2))))))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2))))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (-.f64 (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))))) (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (-.f64 (fma.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (-.f64 (fma.f64 lambda1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 phi1))))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (-.f64 (fma.f64 lambda1 (-.f64 (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 phi1))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 phi1))))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (fma.f64 #s(literal -1 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 phi1)))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 phi1))) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 phi1))) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 phi1)))))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (sin (- lambda2 (- lambda1 (/ (PI) 2)))) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (- lambda2 (- lambda1 (/ (PI) 2)))) (+.f64 (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (cos.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (sin (- lambda2 (- lambda1 (/ (PI) 2)))) (+.f64 (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (sin (- lambda2 (- lambda1 (/ (PI) 2)))) (+.f64 (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (cos.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (- lambda2 (- lambda1 (/ (PI) 2))) (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (- lambda2 (- lambda1 (/ (PI) 2))) (+.f64 lambda2 (fma.f64 #s(literal -1 binary64) lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (- lambda1 (/ (PI) 2)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))
#s(approx (- lambda1 (/ (PI) 2)) (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))))
#s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
#s(approx (sin lambda1) (sin.f64 lambda1))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
#s(approx (neg (cos lambda1)) (*.f64 #s(literal -1 binary64) (cos.f64 lambda1)))
#s(approx (cos lambda1) (cos.f64 lambda1))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
#s(approx (* (sin lambda1) (sin lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (- lambda1 lambda2) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))
#s(approx (sin (- lambda2 (- lambda1 (/ (PI) 2)))) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))
#s(approx (- lambda2 (- lambda1 (/ (PI) 2))) (*.f64 #s(literal -1 binary64) lambda1))
#s(approx (- lambda2 (- lambda1 (/ (PI) 2))) (*.f64 lambda1 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) lambda1) (/.f64 lambda2 lambda1)) #s(literal 1 binary64))))
#s(approx (- lambda1 (/ (PI) 2)) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) lambda1)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 phi1))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 phi1))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))))) (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 lambda2 (fma.f64 #s(literal -1 binary64) lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 lambda2 (fma.f64 #s(literal -1 binary64) lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 lambda2 (fma.f64 #s(literal -1 binary64) lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (sin (- lambda2 (- lambda1 (/ (PI) 2)))) (sin.f64 (+.f64 lambda2 (fma.f64 #s(literal -1 binary64) lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (- lambda2 (- lambda1 (/ (PI) 2))) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
#s(approx (- lambda1 (/ (PI) 2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) lambda1)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 phi1))))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (fma.f64 #s(literal -1 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1)))))
#s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (sin.f64 lambda1)))))))
#s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (cos.f64 lambda1)))))))))
#s(approx (cos lambda2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 2 binary64)))))
#s(approx (cos lambda2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos lambda2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx lambda2 lambda2)
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 lambda1))))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 lambda1)) (*.f64 #s(literal 1/6 binary64) (cos.f64 lambda1)))))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (cos.f64 lambda1) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (cos.f64 lambda1) (*.f64 #s(literal 1/5040 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 lambda1))))))))))
#s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))))
#s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (-.f64 (fma.f64 lambda2 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (-.f64 (fma.f64 lambda2 (-.f64 (*.f64 lambda2 (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (fma.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (sin.f64 lambda1)))))))))
#s(approx (* (sin lambda1) (sin lambda2)) (*.f64 lambda2 (sin.f64 lambda1)))
#s(approx (* (sin lambda1) (sin lambda2)) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (sin.f64 lambda1))))))
#s(approx (* (sin lambda1) (sin lambda2)) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 lambda1) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (sin.f64 lambda1))))))))
#s(approx (* (sin lambda1) (sin lambda2)) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 lambda1) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (sin.f64 lambda1)) (*.f64 #s(literal 1/120 binary64) (sin.f64 lambda1)))))))))
#s(approx (- lambda1 lambda2) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1))))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (-.f64 (*.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (sin.f64 lambda1))))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (-.f64 (fma.f64 lambda2 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (-.f64 (fma.f64 lambda2 (-.f64 (*.f64 lambda2 (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (sin.f64 phi1))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (fma.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (sin.f64 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (sin.f64 phi1)))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (sin.f64 phi1)))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (sin.f64 phi1)))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))))))
#s(approx (sin (- lambda2 (- lambda1 (/ (PI) 2)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)))
#s(approx (sin (- lambda2 (- lambda1 (/ (PI) 2)))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (*.f64 lambda2 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)))))
#s(approx (sin (- lambda2 (- lambda1 (/ (PI) 2)))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (*.f64 lambda2 (+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))))))))
#s(approx (sin (- lambda2 (- lambda1 (/ (PI) 2)))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (*.f64 lambda2 (+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (*.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))))))))))
#s(approx (- lambda2 (- lambda1 (/ (PI) 2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))
#s(approx (- lambda2 (- lambda1 (/ (PI) 2))) (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))
#s(approx (sin lambda2) (sin.f64 lambda2))
#s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))
#s(approx (- lambda2 (- lambda1 (/ (PI) 2))) (*.f64 lambda2 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) lambda2))) (/.f64 lambda1 lambda2))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (sin.f64 phi1))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))
#s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (sin.f64 phi1))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))))) (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (sin (- lambda2 (- lambda1 (/ (PI) 2)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (- lambda2 (- lambda1 (/ (PI) 2))) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1) lambda2)) #s(literal 1 binary64)))))
#s(approx (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (sin.f64 phi1))))))
#s(approx (cos (neg lambda2)) (cos.f64 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (sin.f64 phi2))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi2) (*.f64 #s(literal 1/6 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
#s(approx (* (cos phi1) (sin phi2)) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 phi2)))))
#s(approx (* (cos phi1) (sin phi2)) (+.f64 (sin.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi2) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 phi2)))))))
#s(approx (* (cos phi1) (sin phi2)) (+.f64 (sin.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 phi2)) (*.f64 #s(literal 1/24 binary64) (sin.f64 phi2))))))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx phi1 phi1)
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (*.f64 phi1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (*.f64 phi1 (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (*.f64 phi1 (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (*.f64 phi1 (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))))))
#s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2)))
#s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (+.f64 (cos.f64 phi2) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 phi2))))))
#s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (+.f64 (cos.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi2) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 phi2))))))))
#s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (+.f64 (cos.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 phi2)) (*.f64 #s(literal 1/120 binary64) (cos.f64 phi2)))))))))
#s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
#s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi2) (*.f64 #s(literal 1/6 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (* phi2 (cos phi1)) phi2)
#s(approx (* phi2 (cos phi1)) (+.f64 phi2 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) phi2))))
#s(approx (* phi2 (cos phi1)) (+.f64 phi2 (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) phi2 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) phi2))))))
#s(approx (* phi2 (cos phi1)) (+.f64 phi2 (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) phi2 (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) phi2) (*.f64 #s(literal 1/24 binary64) phi2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 phi1 (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 phi1 (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 phi1 (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi2) (*.f64 #s(literal 1/6 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 phi1 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 phi1 (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 phi1 (fma.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 phi1 (fma.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))))))))
#s(approx (* (cos phi1) (sin phi2)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
#s(approx (cos phi1) (cos.f64 phi1))
#s(approx (* (sin phi1) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))
#s(approx (sin phi1) (sin.f64 phi1))
#s(approx (* phi2 (cos phi1)) (*.f64 phi2 (cos.f64 phi1)))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))))))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))))))))))
#s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))
#s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 phi2 (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 (cos.f64 phi1))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 phi1))))))
#s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 phi1))))))))
#s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 phi1)) (*.f64 #s(literal 1/120 binary64) (cos.f64 phi1)))))))))
#s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))
#s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))))
#s(approx (* (sin phi1) (cos phi2)) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1)))))
#s(approx (* (sin phi1) (cos phi2)) (+.f64 (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1)))))))
#s(approx (* (sin phi1) (cos phi2)) (+.f64 (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1)) (*.f64 #s(literal 1/24 binary64) (sin.f64 phi1))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/24 binary64) (sin.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (* -1/2 (pow phi2 2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64))))
#s(approx (pow phi2 2) (pow.f64 phi2 #s(literal 2 binary64)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 phi2 (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 (cos.f64 phi1))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 phi2 (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 (cos.f64 phi1))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (fma.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (fma.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))))))
#s(approx (cos phi2) (cos.f64 phi2))
#s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))
Calls

12 calls:

TimeVariablePointExpression
36.0ms
lambda1
@-inf
((atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))) (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin lambda1) lambda1 (cos lambda2) lambda2 (* (neg (cos lambda1)) (sin lambda2)) (neg (cos lambda1)) (cos lambda1) (sin lambda2) (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (cos phi2)) (sin phi1) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (* (sin lambda1) (sin lambda2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (cos phi2) (+ 1 (* -1/2 (pow phi2 2))) 1 (* -1/2 (pow phi2 2)) -1/2 (pow phi2 2) 2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (* phi2 (cos phi1)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (sin (- lambda2 (- lambda1 (/ (PI) 2)))) (- lambda2 (- lambda1 (/ (PI) 2))) (- lambda1 (/ (PI) 2)) (/ (PI) 2) (PI) (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (cos (neg lambda2)) (neg lambda2))
32.0ms
phi2
@0
((atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))) (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin lambda1) lambda1 (cos lambda2) lambda2 (* (neg (cos lambda1)) (sin lambda2)) (neg (cos lambda1)) (cos lambda1) (sin lambda2) (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (cos phi2)) (sin phi1) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (* (sin lambda1) (sin lambda2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (cos phi2) (+ 1 (* -1/2 (pow phi2 2))) 1 (* -1/2 (pow phi2 2)) -1/2 (pow phi2 2) 2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (* phi2 (cos phi1)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (sin (- lambda2 (- lambda1 (/ (PI) 2)))) (- lambda2 (- lambda1 (/ (PI) 2))) (- lambda1 (/ (PI) 2)) (/ (PI) 2) (PI) (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (cos (neg lambda2)) (neg lambda2))
11.0ms
phi2
@inf
((atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))) (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin lambda1) lambda1 (cos lambda2) lambda2 (* (neg (cos lambda1)) (sin lambda2)) (neg (cos lambda1)) (cos lambda1) (sin lambda2) (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (cos phi2)) (sin phi1) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (* (sin lambda1) (sin lambda2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (cos phi2) (+ 1 (* -1/2 (pow phi2 2))) 1 (* -1/2 (pow phi2 2)) -1/2 (pow phi2 2) 2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (* phi2 (cos phi1)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (sin (- lambda2 (- lambda1 (/ (PI) 2)))) (- lambda2 (- lambda1 (/ (PI) 2))) (- lambda1 (/ (PI) 2)) (/ (PI) 2) (PI) (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (cos (neg lambda2)) (neg lambda2))
10.0ms
phi2
@-inf
((atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))) (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin lambda1) lambda1 (cos lambda2) lambda2 (* (neg (cos lambda1)) (sin lambda2)) (neg (cos lambda1)) (cos lambda1) (sin lambda2) (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (cos phi2)) (sin phi1) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (* (sin lambda1) (sin lambda2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (cos phi2) (+ 1 (* -1/2 (pow phi2 2))) 1 (* -1/2 (pow phi2 2)) -1/2 (pow phi2 2) 2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (* phi2 (cos phi1)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (sin (- lambda2 (- lambda1 (/ (PI) 2)))) (- lambda2 (- lambda1 (/ (PI) 2))) (- lambda1 (/ (PI) 2)) (/ (PI) 2) (PI) (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (cos (neg lambda2)) (neg lambda2))
9.0ms
lambda2
@-inf
((atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))) (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin lambda1) lambda1 (cos lambda2) lambda2 (* (neg (cos lambda1)) (sin lambda2)) (neg (cos lambda1)) (cos lambda1) (sin lambda2) (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (cos phi2)) (sin phi1) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (* (sin lambda1) (sin lambda2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (cos phi2) (+ 1 (* -1/2 (pow phi2 2))) 1 (* -1/2 (pow phi2 2)) -1/2 (pow phi2 2) 2 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (sin phi2)) (* phi2 (cos phi1)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (sin (- lambda2 (- lambda1 (/ (PI) 2)))) (- lambda2 (- lambda1 (/ (PI) 2))) (- lambda1 (/ (PI) 2)) (/ (PI) 2) (PI) (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (cos (neg lambda2)) (neg lambda2))

rewrite949.0ms (3.6%)

Memory
20.7MiB live, 160.2MiB allocated; 59ms collecting garbage
Counts
56 → 560
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(sin.f64 lambda1)
lambda1
(cos.f64 lambda2)
lambda2
(*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(sin.f64 lambda2)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
#s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64))))
#s(literal 1 binary64)
(*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))
#s(literal -1/2 binary64)
(pow.f64 phi2 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1)))
(*.f64 phi2 (cos.f64 phi1))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))
(cos.f64 (neg.f64 lambda2))
(neg.f64 lambda2)
Outputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (fabs.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))) (neg.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(+.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (neg.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda1)) (cos.f64 lambda2)))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(fma.f64 (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(neg.f64 (sin.f64 (-.f64 lambda2 lambda1)))
(neg.f64 (-.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin.f64 lambda1)
lambda1
(+.f64 (*.f64 (sin.f64 lambda2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 lambda2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 lambda2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 lambda2)
(cos.f64 (neg.f64 lambda2))
(cos.f64 (fabs.f64 lambda2))
(cos.f64 (fabs.f64 (fabs.f64 lambda2)))
(cos.f64 (neg.f64 (fabs.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 lambda2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 lambda2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 lambda2)))
(sin.f64 (+.f64 (fabs.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))
lambda2
(neg.f64 (neg.f64 lambda2))
(*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))
(*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))
(*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 lambda1 (PI.f64)))) (sin.f64 (+.f64 lambda2 (+.f64 lambda1 (PI.f64))))) #s(literal 2 binary64))
(neg.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (neg.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (PI.f64))) (*.f64 (sin.f64 lambda1) (sin.f64 (PI.f64))))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 lambda1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 (+.f64 lambda1 (PI.f64)))
(cos.f64 (fabs.f64 (+.f64 lambda1 (PI.f64))))
(cos.f64 (+.f64 (fabs.f64 lambda1) (PI.f64)))
(cos.f64 (+.f64 (neg.f64 lambda1) (PI.f64)))
(cos.f64 (neg.f64 (+.f64 lambda1 (PI.f64))))
(cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 lambda1) (cos.f64 (neg.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(neg.f64 (cos.f64 lambda1))
(sin.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (+.f64 lambda1 (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (PI.f64)))
(sin.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)))
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 lambda1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 lambda1)
(cos.f64 (fabs.f64 lambda1))
(cos.f64 (neg.f64 lambda1))
(cos.f64 (fabs.f64 (fabs.f64 lambda1)))
(cos.f64 (+.f64 (+.f64 lambda1 (PI.f64)) (PI.f64)))
(cos.f64 (neg.f64 (fabs.f64 lambda1)))
(cos.f64 (neg.f64 (neg.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 lambda1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(neg.f64 (neg.f64 (cos.f64 lambda1)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1))
(sin.f64 (+.f64 (fabs.f64 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1))
(sin.f64 lambda2)
(+.f64 (*.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 phi2)
(cos.f64 (fabs.f64 phi2))
(cos.f64 (neg.f64 phi2))
(cos.f64 (fabs.f64 (fabs.f64 phi2)))
(cos.f64 (neg.f64 (fabs.f64 phi2)))
(cos.f64 (neg.f64 (neg.f64 phi2)))
(fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(sin.f64 (+.f64 (fabs.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
phi2
(+.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (neg.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi1) (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(neg.f64 (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(/.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi2 (fabs.f64 phi1))) (sin.f64 (+.f64 phi2 (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi2 (neg.f64 phi1))) (sin.f64 (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 phi1)
(cos.f64 (fabs.f64 phi1))
(cos.f64 (neg.f64 phi1))
(cos.f64 (fabs.f64 (fabs.f64 phi1)))
(cos.f64 (neg.f64 (fabs.f64 phi1)))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(sin.f64 (+.f64 (fabs.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (neg.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 phi1))
(*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(+.f64 (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (fabs.f64 phi2))) (sin.f64 (+.f64 phi1 (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(sin.f64 phi1)
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (sin.f64 lambda2)) (neg.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda2)) (neg.f64 (cos.f64 lambda1))))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (neg.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 (neg.f64 lambda1))) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (fabs.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (fabs.f64 (fabs.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (fabs.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda2)) (neg.f64 (cos.f64 lambda1))))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (*.f64 (neg.f64 (cos.f64 lambda2)) (neg.f64 (cos.f64 lambda1))))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (neg.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (neg.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2))))
(fma.f64 (sin.f64 lambda2) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (neg.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(fma.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (sin.f64 lambda2) (neg.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 (neg.f64 lambda1))) (sin.f64 lambda2)))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 (neg.f64 lambda1))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 (neg.f64 lambda1))) (sin.f64 lambda2)))
(neg.f64 (sin.f64 (-.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda2)))
(neg.f64 (-.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(neg.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (sin.f64 lambda2))))
(sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (fabs.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (neg.f64 #s(literal 2 binary64)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(+.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (neg.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda1)) (cos.f64 lambda2)))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(fma.f64 (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(neg.f64 (sin.f64 (-.f64 lambda2 lambda1)))
(neg.f64 (-.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(+.f64 (neg.f64 lambda2) lambda1)
(+.f64 lambda1 (neg.f64 lambda2))
(-.f64 lambda1 lambda2)
(neg.f64 (-.f64 lambda2 lambda1))
#s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)))
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)))))
(+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (neg.f64 #s(literal -1/2 binary64))) (*.f64 phi2 phi2)))
(-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) (neg.f64 #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2))))
(fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) phi2 #s(literal 1 binary64))
(fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64))
(fma.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)) #s(literal 1 binary64))
(neg.f64 (-.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2))) #s(literal 1 binary64)))
#s(literal 1 binary64)
(fabs.f64 #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) #s(literal 0 binary64))
(/.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 #s(literal 0 binary64)))) #s(literal 2 binary64))
(cosh.f64 #s(literal 0 binary64))
(cosh.f64 (neg.f64 #s(literal 0 binary64)))
(exp.f64 #s(literal 0 binary64))
(*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2))
(*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64))
(*.f64 (*.f64 #s(literal -1/2 binary64) phi2) phi2)
(*.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)))
#s(literal -1/2 binary64)
(*.f64 phi2 phi2)
(*.f64 (fabs.f64 phi2) (fabs.f64 phi2))
(*.f64 (neg.f64 phi2) (neg.f64 phi2))
(pow.f64 phi2 #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 #s(literal 2 binary64) #s(literal 1 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (cosh.f64 (/.f64 (+.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 2 binary64))) (cosh.f64 (/.f64 (-.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 2 binary64)))))
(+.f64 #s(literal 1 binary64) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (neg.f64 #s(literal 1 binary64)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (fabs.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))) (neg.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1)))
(*.f64 phi2 (cos.f64 phi1))
(*.f64 (cos.f64 phi1) phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (neg.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (sin.f64 lambda2)) (neg.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda2)) (neg.f64 (cos.f64 lambda1))))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (neg.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 (neg.f64 lambda1))) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (fabs.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (fabs.f64 (fabs.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (fabs.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda2)) (neg.f64 (cos.f64 lambda1))))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (*.f64 (neg.f64 (cos.f64 lambda2)) (neg.f64 (cos.f64 lambda1))))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (neg.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (neg.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2))))
(fma.f64 (sin.f64 lambda2) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (neg.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(fma.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (sin.f64 lambda2) (neg.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 (neg.f64 lambda1))) (sin.f64 lambda2)))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 (neg.f64 lambda1))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 (neg.f64 lambda1))) (sin.f64 lambda2)))
(neg.f64 (sin.f64 (-.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda2)))
(neg.f64 (-.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(neg.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (sin.f64 lambda2))))
(sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (fabs.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (neg.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi1) (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(neg.f64 (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (neg.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (sin.f64 lambda2)) (neg.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda2)) (neg.f64 (cos.f64 lambda1))))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (neg.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 (neg.f64 lambda1))) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (fabs.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (fabs.f64 (fabs.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (fabs.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda2)) (neg.f64 (cos.f64 lambda1))))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (*.f64 (neg.f64 (cos.f64 lambda2)) (neg.f64 (cos.f64 lambda1))))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (neg.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (neg.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2))))
(fma.f64 (sin.f64 lambda2) (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (neg.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(fma.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (sin.f64 lambda2) (neg.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 (neg.f64 lambda1))) (sin.f64 lambda2)))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 (neg.f64 lambda1))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 (neg.f64 lambda1))) (sin.f64 lambda2)))
(neg.f64 (sin.f64 (-.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda2)))
(neg.f64 (-.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(neg.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (sin.f64 lambda2))))
(sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (fabs.f64 (-.f64 lambda1 lambda2)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))
(+.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) lambda2)
(+.f64 lambda2 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1))
(-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (-.f64 lambda2 lambda1) (neg.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 (fma.f64 (-.f64 lambda2 lambda1) (neg.f64 #s(literal 2 binary64)) (neg.f64 (PI.f64))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 lambda2 lambda1) #s(literal 2 binary64) (PI.f64)) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 #s(literal 2 binary64)) (PI.f64))) #s(literal 2 binary64))
(fma.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (PI.f64) (-.f64 lambda2 lambda1))
(fma.f64 (PI.f64) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))
(fma.f64 (neg.f64 (PI.f64)) (/.f64 #s(literal 1 binary64) (neg.f64 #s(literal 2 binary64))) (-.f64 lambda2 lambda1))
(neg.f64 (-.f64 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda2))
(*.f64 (-.f64 (*.f64 lambda1 #s(literal 2 binary64)) (PI.f64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(+.f64 (neg.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) lambda1)
(+.f64 lambda1 (neg.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))
(-.f64 (/.f64 (*.f64 lambda1 #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 lambda1 #s(literal 2 binary64)) (PI.f64)) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 #s(literal 2 binary64)) (PI.f64))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 lambda1 (neg.f64 #s(literal 2 binary64))) (neg.f64 (PI.f64))) (neg.f64 #s(literal 2 binary64)))
(fma.f64 (neg.f64 (PI.f64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) lambda1)
(fma.f64 (PI.f64) (neg.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) lambda1)
(neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1))
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (PI.f64))
(*.f64 (PI.f64) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(*.f64 (neg.f64 (PI.f64)) (/.f64 #s(literal 1 binary64) (neg.f64 #s(literal 2 binary64))))
(/.f64 (PI.f64) #s(literal 2 binary64))
(/.f64 (*.f64 (PI.f64) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (neg.f64 (PI.f64)) (neg.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (PI.f64))) (neg.f64 (neg.f64 #s(literal 2 binary64))))
(neg.f64 (neg.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(PI.f64)
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))
#s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))
(+.f64 (*.f64 (sin.f64 lambda2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 lambda2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 lambda2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 lambda2)
(cos.f64 (neg.f64 lambda2))
(cos.f64 (fabs.f64 lambda2))
(cos.f64 (fabs.f64 (fabs.f64 lambda2)))
(cos.f64 (neg.f64 (fabs.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 lambda2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 lambda2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 lambda2)))
(sin.f64 (+.f64 (fabs.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))
(neg.f64 lambda2)

eval136.0ms (0.5%)

Memory
1.1MiB live, 90.7MiB allocated; 11ms collecting garbage
Compiler

Compiled 13 901 to 4 182 computations (69.9% saved)

prune136.0ms (0.5%)

Memory
-19.8MiB live, 81.0MiB allocated; 6ms collecting garbage
Pruning

101 alts after pruning (100 fresh and 1 done)

PrunedKeptTotal
New85561916
Fresh263965
Picked505
Done011
Total886101987
Accuracy
99.8%
Counts
987 → 101
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.7%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
78.5%
(atan2.f64 (fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
21.2%
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
42.5%
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
36.7%
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
78.4%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
69.7%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 lambda2))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
78.5%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 lambda1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
70.9%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
99.7%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
99.7%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
88.3%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
99.7%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
71.6%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
71.4%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
79.6%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
78.4%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
57.2%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
59.4%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
58.6%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
81.2%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
77.2%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
63.9%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
60.2%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
59.2%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))
56.6%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
59.1%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (sin.f64 phi2)))
59.0%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
51.3%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
52.8%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) #s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
68.8%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 #s(approx (cos lambda1) #s(literal 1 binary64))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
67.3%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 (+.f64 lambda1 (PI.f64))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
78.8%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
78.5%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
68.7%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
99.7%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
59.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
48.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (cos.f64 (-.f64 lambda1 lambda2)))))
36.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
46.7%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
28.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
45.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
29.6%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
76.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
76.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
59.6%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
63.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
59.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))))
59.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 #s(approx (- lambda1 (/ (PI) 2)) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))
47.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (- lambda2 (- lambda1 (/ (PI) 2))) (*.f64 #s(literal -1 binary64) lambda1))))))
66.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))
69.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
53.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))))))
48.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
55.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
65.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
66.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))))
64.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
38.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
39.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
39.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
45.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
34.0%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
44.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) #s(approx (* phi2 (cos phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
36.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
48.0%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
46.0%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
47.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
27.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
28.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
26.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
42.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
24.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
34.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
45.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
45.0%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
43.6%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
29.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
42.0%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
25.7%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
26.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
18.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
16.4%
(atan2.f64 (*.f64 (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (PI.f64))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
40.6%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
67.2%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
42.6%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
24.0%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
23.7%
(atan2.f64 (*.f64 (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
41.0%
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
41.0%
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
21.7%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
35.8%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
22.5%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
34.2%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
40.9%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
26.6%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
29.2%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
20.9%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
53.8%
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
43.7%
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
42.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Compiler

Compiled 6 003 to 5 481 computations (8.7% saved)

series2.2s (8.5%)

Memory
70.2MiB live, 713.9MiB allocated; 138ms collecting garbage
Counts
51 → 339
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(sin.f64 lambda1)
lambda1
(cos.f64 lambda2)
lambda2
(*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(sin.f64 lambda2)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
#s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))
(*.f64 phi2 phi2)
#s(literal -1/2 binary64)
#s(literal 1 binary64)
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(literal -1 binary64)
(*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
(*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2))
Outputs
#s(approx (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))))) (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))))))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
#s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2)))
#s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2))))
#s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2)))))))
#s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 lambda2)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))))))))
#s(approx (sin lambda1) lambda1)
#s(approx (sin lambda1) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))))
#s(approx (sin lambda1) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin lambda1) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2)))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2)) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (sin.f64 lambda2) (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (sin.f64 lambda2)))))))))
#s(approx (neg (cos lambda1)) #s(literal -1 binary64))
#s(approx (neg (cos lambda1)) (-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1 binary64)))
#s(approx (neg (cos lambda1)) (-.f64 (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/24 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) #s(literal 1 binary64)))
#s(approx (neg (cos lambda1)) (-.f64 (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/720 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/24 binary64))))) #s(literal 1 binary64)))
#s(approx (cos lambda1) #s(literal 1 binary64))
#s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))
#s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 lambda1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (-.f64 (fma.f64 lambda1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (-.f64 (fma.f64 lambda1 (-.f64 (*.f64 lambda1 (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))
#s(approx (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (fma.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))))))
#s(approx (* (cos lambda1) (cos lambda2)) (cos.f64 lambda2))
#s(approx (* (cos lambda1) (cos lambda2)) (+.f64 (cos.f64 lambda2) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 lambda2)))))
#s(approx (* (cos lambda1) (cos lambda2)) (+.f64 (cos.f64 lambda2) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 lambda2)))))))
#s(approx (* (cos lambda1) (cos lambda2)) (+.f64 (cos.f64 lambda2) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 lambda2)) (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda2))))))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1))))) (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda1 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2)))
#s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))
#s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))))))))
#s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (- lambda1 lambda2) (-.f64 lambda1 lambda2))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (fma.f64 lambda1 (-.f64 (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))))
#s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))))
#s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 (sin.f64 phi2) (fma.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (*.f64 lambda1 (*.f64 phi1 (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))))
#s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 (sin.f64 phi2) (fma.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (*.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (*.f64 phi1 (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))))
#s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 (sin.f64 phi2) (fma.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (*.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (*.f64 phi1 (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (*.f64 phi1 (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))))
#s(approx (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (*.f64 lambda1 (*.f64 phi1 (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))
#s(approx (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (*.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))) (*.f64 phi1 (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))))
#s(approx (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (*.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (*.f64 phi1 (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (*.f64 phi1 (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))))
#s(approx (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1 binary64) (*.f64 lambda1 (*.f64 phi1 (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (*.f64 phi1 (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))))) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))))))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2))))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (-.f64 (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 (neg.f64 lambda2))))))
#s(approx (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
#s(approx (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))
#s(approx (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)) (*.f64 lambda1 (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2))))))
#s(approx (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)) (*.f64 lambda1 (fma.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))))))
#s(approx (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)) (*.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)))
#s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (fma.f64 #s(literal -1 binary64) (*.f64 lambda1 (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))
#s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2))) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))
#s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2))) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1)) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda2)))))))) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))
#s(approx (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))) (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2)))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (sin.f64 lambda2)))))))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))))
#s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
#s(approx (sin lambda1) (sin.f64 lambda1))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
#s(approx (neg (cos lambda1)) (*.f64 #s(literal -1 binary64) (cos.f64 lambda1)))
#s(approx (cos lambda1) (cos.f64 lambda1))
#s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))))))
#s(approx (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))))))
#s(approx (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (* (cos lambda1) (cos lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
#s(approx (- lambda1 lambda2) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
#s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
#s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1))))) (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))) (sin.f64 phi1))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))) (sin.f64 phi1)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 phi1)))))
#s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))))
#s(approx (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))))
#s(approx (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))))
#s(approx (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 phi1))))))
#s(approx (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 phi1))))
#s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 phi1)))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (fma.f64 #s(literal -1 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (fma.f64 lambda2 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))
#s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1)))))
#s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (sin.f64 lambda1)))))))
#s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 lambda1) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (cos.f64 lambda1)))))))))
#s(approx (cos lambda2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda2 #s(literal 2 binary64)))))
#s(approx (cos lambda2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos lambda2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx lambda2 lambda2)
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 lambda1))))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 lambda1)) (*.f64 #s(literal 1/6 binary64) (cos.f64 lambda1)))))))
#s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (cos.f64 lambda1) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (cos.f64 lambda1) (*.f64 #s(literal 1/5040 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 lambda1))))))))))
#s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))))
#s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (-.f64 (fma.f64 lambda2 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (-.f64 (fma.f64 lambda2 (-.f64 (*.f64 lambda2 (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))
#s(approx (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (fma.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin lambda2)) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (sin.f64 phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin lambda2)) (*.f64 lambda2 (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin lambda2)) (*.f64 lambda2 (fma.f64 (cos.f64 phi2) (sin.f64 phi1) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin lambda2)) (*.f64 lambda2 (fma.f64 (cos.f64 phi2) (sin.f64 phi1) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))))))
#s(approx (* (cos lambda1) (cos lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 lambda1)))))
#s(approx (* (cos lambda1) (cos lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 lambda1)))))))
#s(approx (* (cos lambda1) (cos lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 lambda1)) (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda1))))))))
#s(approx (- lambda1 lambda2) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (fma.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda1)))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (fma.f64 lambda2 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 phi1))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda1)))))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (fma.f64 lambda2 (-.f64 (*.f64 lambda2 (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda1)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 phi1)))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 (neg.f64 lambda1)))))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 phi1)))))
#s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 (sin.f64 phi2) (fma.f64 #s(literal -1 binary64) (*.f64 lambda2 (*.f64 phi1 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
#s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 (sin.f64 phi2) (fma.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (*.f64 phi1 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))))
#s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 (sin.f64 phi2) (fma.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 lambda2 (fma.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (*.f64 phi1 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))))
#s(approx (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (*.f64 lambda2 (*.f64 phi1 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (*.f64 phi1 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))))
#s(approx (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 lambda2 (fma.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (*.f64 phi1 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))))))
#s(approx (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))) (*.f64 phi1 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 lambda2 (*.f64 phi1 (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 phi1 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 phi1 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) (*.f64 phi1 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (*.f64 phi1 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (*.f64 phi1 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))))) (*.f64 phi1 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (*.f64 phi1 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1))))))
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (-.f64 (*.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (sin.f64 lambda1))))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1))))))
#s(approx (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 phi1))))
#s(approx (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (fma.f64 #s(literal -1 binary64) (*.f64 lambda2 (*.f64 (sin.f64 lambda1) (sin.f64 phi1))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 phi1)))))
#s(approx (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 phi1)) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (sin.f64 phi1))))))))
#s(approx (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 phi1)) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (*.f64 lambda2 (fma.f64 #s(literal 1/6 binary64) (*.f64 lambda2 (*.f64 (sin.f64 lambda1) (sin.f64 phi1))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 phi1)))))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 lambda1) (sin.f64 phi1)))
#s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (fma.f64 lambda2 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (sin.f64 phi1))))
#s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (sin.f64 phi1))) (*.f64 (sin.f64 lambda1) (sin.f64 phi1))) (*.f64 (cos.f64 lambda1) (sin.f64 phi1))))
#s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 phi1)) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (*.f64 (sin.f64 lambda1) (sin.f64 phi1))))) (*.f64 (sin.f64 lambda1) (sin.f64 phi1))) (*.f64 (cos.f64 lambda1) (sin.f64 phi1))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)))))))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (sin.f64 lambda1)))))))))
#s(approx (sin lambda2) (sin.f64 lambda2))
#s(approx (* (* (sin phi1) (cos phi2)) (sin lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))))
#s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1))))) (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))) (sin.f64 phi1))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))
#s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))) (sin.f64 phi1)))))
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (sin.f64 phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (sin.f64 phi1)))))
#s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))))))
#s(approx (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))))
#s(approx (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))
#s(approx (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (atan2.f64 (*.f64 (cos.f64 phi2) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (sin.f64 phi1))))))
#s(approx (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (sin.f64 phi1))))
#s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (sin.f64 phi1)))
#s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (sin.f64 phi2))
#s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 phi1 (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
#s(approx (* (cos phi1) (sin phi2)) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 phi2)))))
#s(approx (* (cos phi1) (sin phi2)) (+.f64 (sin.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi2) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 phi2)))))))
#s(approx (* (cos phi1) (sin phi2)) (+.f64 (sin.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 phi2)) (*.f64 #s(literal 1/24 binary64) (sin.f64 phi2))))))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx phi1 phi1)
#s(approx (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (*.f64 phi1 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (*.f64 phi1 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))))
#s(approx (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (*.f64 phi1 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))))))
#s(approx (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (*.f64 phi1 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) (fma.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) (*.f64 #s(literal -1/5040 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin lambda2)) (*.f64 phi1 (*.f64 (cos.f64 phi2) (sin.f64 lambda2))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin lambda2)) (*.f64 phi1 (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin lambda2)) (*.f64 phi1 (fma.f64 (cos.f64 phi2) (sin.f64 lambda2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin lambda2)) (*.f64 phi1 (fma.f64 (cos.f64 phi2) (sin.f64 lambda2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))))))))))
#s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2)))
#s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (+.f64 (cos.f64 phi2) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 phi2))))))
#s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (+.f64 (cos.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi2) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 phi2))))))))
#s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (+.f64 (cos.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 phi2)) (*.f64 #s(literal 1/120 binary64) (cos.f64 phi2)))))))))
#s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))
#s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi1 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (*.f64 phi1 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))
#s(approx (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (*.f64 phi1 (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
#s(approx (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (*.f64 phi1 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (*.f64 phi1 (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi2) (*.f64 #s(literal 1/6 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi2) (*.f64 #s(literal 1/6 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/6 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/5040 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 phi1 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 phi1 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 phi1 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/120 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi2) (*.f64 #s(literal 1/6 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (*.f64 phi1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (*.f64 phi1 (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (*.f64 phi1 (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (*.f64 phi1 (fma.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))))))
#s(approx (* (cos phi1) (sin phi2)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
#s(approx (cos phi1) (cos.f64 phi1))
#s(approx (* (sin phi1) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))
#s(approx (sin phi1) (sin.f64 phi1))
#s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 phi2) phi1))))
#s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 phi2) phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))))))))
#s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))))))))))
#s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))
#s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx phi2 phi2)
#s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (*.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal -1 binary64) (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))))))))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))))))
#s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 phi2 (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 (cos.f64 phi1))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))))))))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))))))
#s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1)))
#s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 phi1))))))
#s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 phi1))))))))
#s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 phi1)) (*.f64 #s(literal 1/120 binary64) (cos.f64 phi1)))))))))
#s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))
#s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))
#s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/6 binary64))))))
#s(approx (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))))
#s(approx (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))))))))
#s(approx (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))))))))))))
#s(approx (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1))) (*.f64 #s(literal -1/720 binary64) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))))))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin lambda2)) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
#s(approx (* (* (sin phi1) (cos phi2)) (sin lambda2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin lambda2)) (fma.f64 (sin.f64 lambda2) (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (sin lambda2)) (fma.f64 (sin.f64 lambda2) (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))))))))
#s(approx (* (sin phi1) (cos phi2)) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1)))))
#s(approx (* (sin phi1) (cos phi2)) (+.f64 (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1)))))))
#s(approx (* (sin phi1) (cos phi2)) (+.f64 (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1)) (*.f64 #s(literal 1/24 binary64) (sin.f64 phi1))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1))))
#s(approx (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)))))
#s(approx (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1))))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/24 binary64) (sin.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (* phi2 phi2) (pow.f64 phi2 #s(literal 2 binary64)))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 phi2 (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 (cos.f64 phi1))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 phi2 (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 (cos.f64 phi1))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
#s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 (*.f64 phi2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (fma.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (fma.f64 #s(literal -1/6 binary64) phi2 (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))
#s(approx (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (*.f64 phi1 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))) (fma.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/24 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/720 binary64) (*.f64 phi1 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
#s(approx (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/24 binary64) (*.f64 phi1 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi1 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 1/24 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (cos phi2) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 phi2 (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 (cos.f64 phi1))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))))
#s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (fma.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))))
#s(approx (cos phi2) (cos.f64 phi2))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64))))
#s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))
Calls

12 calls:

TimeVariablePointExpression
19.0ms
lambda1
@-inf
((atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))))) (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin lambda1) lambda1 (cos lambda2) lambda2 (* (neg (cos lambda1)) (sin lambda2)) (neg (cos lambda1)) (cos lambda1) (sin lambda2) (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (* (* (sin phi1) (cos phi2)) (sin lambda2)) (* (sin phi1) (cos phi2)) (sin phi1) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (cos lambda1) (cos lambda2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (cos phi2) (+ (* (* phi2 phi2) -1/2) 1) (* phi2 phi2) -1/2 1 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))) -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (cos (- lambda1 lambda2)) (sin phi1)) (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))
13.0ms
phi2
@inf
((atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))))) (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin lambda1) lambda1 (cos lambda2) lambda2 (* (neg (cos lambda1)) (sin lambda2)) (neg (cos lambda1)) (cos lambda1) (sin lambda2) (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (* (* (sin phi1) (cos phi2)) (sin lambda2)) (* (sin phi1) (cos phi2)) (sin phi1) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (cos lambda1) (cos lambda2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (cos phi2) (+ (* (* phi2 phi2) -1/2) 1) (* phi2 phi2) -1/2 1 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))) -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (cos (- lambda1 lambda2)) (sin phi1)) (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))
9.0ms
phi2
@-inf
((atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))))) (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin lambda1) lambda1 (cos lambda2) lambda2 (* (neg (cos lambda1)) (sin lambda2)) (neg (cos lambda1)) (cos lambda1) (sin lambda2) (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (* (* (sin phi1) (cos phi2)) (sin lambda2)) (* (sin phi1) (cos phi2)) (sin phi1) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (cos lambda1) (cos lambda2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (cos phi2) (+ (* (* phi2 phi2) -1/2) 1) (* phi2 phi2) -1/2 1 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))) -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (cos (- lambda1 lambda2)) (sin phi1)) (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))
8.0ms
lambda2
@-inf
((atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))))) (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin lambda1) lambda1 (cos lambda2) lambda2 (* (neg (cos lambda1)) (sin lambda2)) (neg (cos lambda1)) (cos lambda1) (sin lambda2) (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (* (* (sin phi1) (cos phi2)) (sin lambda2)) (* (sin phi1) (cos phi2)) (sin phi1) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (cos lambda1) (cos lambda2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (cos phi2) (+ (* (* phi2 phi2) -1/2) 1) (* phi2 phi2) -1/2 1 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))) -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (cos (- lambda1 lambda2)) (sin phi1)) (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))
8.0ms
lambda2
@inf
((atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))))) (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (sin lambda1) lambda1 (cos lambda2) lambda2 (* (neg (cos lambda1)) (sin lambda2)) (neg (cos lambda1)) (cos lambda1) (sin lambda2) (cos phi2) phi2 (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (* (cos phi1) (sin phi2)) (cos phi1) phi1 (sin phi2) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (* (* (sin phi1) (cos phi2)) (sin lambda2)) (* (sin phi1) (cos phi2)) (sin phi1) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (cos lambda1) (cos lambda2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (cos phi2) (+ (* (* phi2 phi2) -1/2) 1) (* phi2 phi2) -1/2 1 (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))) -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (cos phi2) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (cos (- lambda1 lambda2)) (sin phi1)) (atan2 (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))

rewrite2.1s (8.2%)

Memory
-133.6MiB live, 205.4MiB allocated; 2.0s collecting garbage
Counts
51 → 541
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(sin.f64 lambda1)
lambda1
(cos.f64 lambda2)
lambda2
(*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
(sin.f64 lambda2)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
#s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))
(*.f64 phi2 phi2)
#s(literal -1/2 binary64)
#s(literal 1 binary64)
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(literal -1 binary64)
(*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
(*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))
#s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2))
Outputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (fabs.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))) (neg.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(+.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (neg.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda1)) (cos.f64 lambda2)))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (+.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(fma.f64 (+.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(neg.f64 (sin.f64 (-.f64 lambda2 lambda1)))
(neg.f64 (-.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin.f64 lambda1)
lambda1
(+.f64 (*.f64 (sin.f64 lambda2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 lambda2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 lambda2)
(cos.f64 (fabs.f64 lambda2))
(cos.f64 (neg.f64 lambda2))
(cos.f64 (fabs.f64 (fabs.f64 lambda2)))
(cos.f64 (neg.f64 (fabs.f64 lambda2)))
(cos.f64 (neg.f64 (neg.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 lambda2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))
(sin.f64 (+.f64 (fabs.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))
lambda2
(*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))
(*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))
(*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 lambda1 (PI.f64)))) (sin.f64 (+.f64 lambda2 (+.f64 lambda1 (PI.f64))))) #s(literal 2 binary64))
(neg.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (PI.f64))) (*.f64 (sin.f64 lambda1) (sin.f64 (PI.f64))))
(cos.f64 (+.f64 lambda1 (PI.f64)))
(cos.f64 (fabs.f64 (+.f64 lambda1 (PI.f64))))
(cos.f64 (+.f64 (fabs.f64 lambda1) (PI.f64)))
(cos.f64 (+.f64 (neg.f64 lambda1) (PI.f64)))
(cos.f64 (neg.f64 (+.f64 lambda1 (PI.f64))))
(cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(neg.f64 (cos.f64 lambda1))
(sin.f64 (+.f64 (+.f64 lambda1 (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (PI.f64)))
(sin.f64 (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)))
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 lambda1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 lambda1)
(cos.f64 (fabs.f64 lambda1))
(cos.f64 (neg.f64 lambda1))
(cos.f64 (fabs.f64 (fabs.f64 lambda1)))
(cos.f64 (+.f64 (+.f64 lambda1 (PI.f64)) (PI.f64)))
(cos.f64 (neg.f64 (fabs.f64 lambda1)))
(cos.f64 (neg.f64 (neg.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 lambda1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(neg.f64 (neg.f64 (cos.f64 lambda1)))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1))
(sin.f64 (+.f64 (fabs.f64 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 lambda2)
(+.f64 (*.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 phi2)
(cos.f64 (fabs.f64 phi2))
(cos.f64 (neg.f64 phi2))
(cos.f64 (fabs.f64 (fabs.f64 phi2)))
(cos.f64 (neg.f64 (fabs.f64 phi2)))
(cos.f64 (neg.f64 (neg.f64 phi2)))
(fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))
(sin.f64 (+.f64 (fabs.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))
phi2
(+.f64 (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi1) (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(neg.f64 (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(neg.f64 (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(/.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi2 (fabs.f64 phi1))) (sin.f64 (+.f64 phi2 (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi2 (neg.f64 phi1))) (sin.f64 (+.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1) phi2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))) (cos.f64 (+.f64 phi2 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1)))) #s(literal 2 binary64))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(cos.f64 phi1)
(cos.f64 (neg.f64 phi1))
(cos.f64 (fabs.f64 phi1))
(cos.f64 (fabs.f64 (fabs.f64 phi1)))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(cos.f64 (neg.f64 (fabs.f64 phi1)))
(fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi1))
(sin.f64 (+.f64 (fabs.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
(sin.f64 (+.f64 (neg.f64 phi1) (/.f64 (PI.f64) #s(literal 2 binary64))))
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (neg.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (neg.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 (neg.f64 lambda1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))))
(-.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))) (sin.f64 lambda1)))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (sin.f64 lambda2) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (neg.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (neg.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (neg.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (neg.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (neg.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1)) (neg.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (neg.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (neg.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (neg.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (neg.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1) (neg.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (neg.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (sin.f64 lambda2) (neg.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (neg.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(neg.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 lambda2)))
(*.f64 (sin.f64 lambda2) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (sin.f64 lambda2)) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 lambda2) (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 phi1))
(*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(+.f64 (/.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(/.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (fabs.f64 phi2))) (sin.f64 (+.f64 phi1 (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1)) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 phi1 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(sin.f64 phi1)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))
(*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1))
(*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 (cos.f64 lambda2) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))
(*.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2)))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(*.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 lambda2) lambda1)) (cos.f64 (-.f64 (fabs.f64 lambda2) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 lambda2) (fabs.f64 lambda1))) (cos.f64 (-.f64 (fabs.f64 lambda2) (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 lambda2) (neg.f64 lambda1))) (cos.f64 (-.f64 (fabs.f64 lambda2) (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 lambda2) (fabs.f64 lambda1))) (cos.f64 (-.f64 (neg.f64 lambda2) (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 lambda2) (neg.f64 lambda1))) (cos.f64 (-.f64 (neg.f64 lambda2) (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 lambda1) lambda2)) (cos.f64 (-.f64 (fabs.f64 lambda1) lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 lambda1) (fabs.f64 lambda2))) (cos.f64 (-.f64 (fabs.f64 lambda1) (fabs.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 lambda1) (neg.f64 lambda2))) (cos.f64 (-.f64 (fabs.f64 lambda1) (neg.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (neg.f64 lambda1) lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 lambda1) (fabs.f64 lambda2))) (cos.f64 (-.f64 (neg.f64 lambda1) (fabs.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 lambda1) (neg.f64 lambda2))) (cos.f64 (-.f64 (neg.f64 lambda1) (neg.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (fabs.f64 lambda1))) (cos.f64 (-.f64 lambda2 (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda1 (fabs.f64 lambda2))) (cos.f64 (-.f64 lambda1 (fabs.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))) (neg.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (fabs.f64 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (neg.f64 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) lambda2)) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (fabs.f64 lambda2))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (fabs.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (neg.f64 lambda2))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (neg.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)))) #s(literal 2 binary64))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(+.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (neg.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda1)) (cos.f64 lambda2)))
(/.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (+.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(fma.f64 (+.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(neg.f64 (sin.f64 (-.f64 lambda2 lambda1)))
(neg.f64 (-.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(+.f64 (neg.f64 lambda2) lambda1)
(+.f64 lambda1 (neg.f64 lambda2))
(+.f64 (neg.f64 lambda2) (neg.f64 (neg.f64 lambda1)))
(-.f64 lambda1 lambda2)
(-.f64 lambda1 (neg.f64 (neg.f64 lambda2)))
(neg.f64 (-.f64 lambda2 lambda1))
#s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 phi2 #s(literal -1/2 binary64)) phi2) #s(literal 1 binary64))
(+.f64 (*.f64 (*.f64 phi2 #s(literal -1/2 binary64)) phi2) (neg.f64 (neg.f64 #s(literal 1 binary64))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 #s(literal -1/2 binary64)) phi2))
(-.f64 (*.f64 (*.f64 phi2 #s(literal -1/2 binary64)) phi2) (neg.f64 #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 phi2) (*.f64 phi2 #s(literal -1/2 binary64))))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 #s(literal -1/2 binary64)) (*.f64 phi2 phi2)))
(-.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (*.f64 phi2 #s(literal -1/2 binary64)) phi2)))
(-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 phi2 phi2)) #s(literal -1/2 binary64)))
(fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 phi2 #s(literal -1/2 binary64)) phi2 #s(literal 1 binary64))
(fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64))
(fma.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (neg.f64 phi2)) (neg.f64 phi2) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (neg.f64 phi2)) (neg.f64 phi2) (neg.f64 (neg.f64 #s(literal 1 binary64))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (fabs.f64 phi2)) (fabs.f64 phi2) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (fabs.f64 phi2)) (fabs.f64 phi2) (neg.f64 (neg.f64 #s(literal 1 binary64))))
(fma.f64 (fabs.f64 phi2) (*.f64 (fabs.f64 phi2) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(fma.f64 (fabs.f64 phi2) (*.f64 (fabs.f64 phi2) #s(literal -1/2 binary64)) (neg.f64 (neg.f64 #s(literal 1 binary64))))
(fma.f64 (neg.f64 phi2) (*.f64 (neg.f64 phi2) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(fma.f64 (neg.f64 phi2) (*.f64 (neg.f64 phi2) #s(literal -1/2 binary64)) (neg.f64 (neg.f64 #s(literal 1 binary64))))
(fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) (neg.f64 (neg.f64 #s(literal 1 binary64))))
(fma.f64 (*.f64 phi2 #s(literal -1/2 binary64)) phi2 (neg.f64 (neg.f64 #s(literal 1 binary64))))
(fma.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)) (neg.f64 (neg.f64 #s(literal 1 binary64))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) (neg.f64 (neg.f64 #s(literal 1 binary64))))
(neg.f64 (-.f64 (neg.f64 #s(literal 1 binary64)) (*.f64 (*.f64 phi2 #s(literal -1/2 binary64)) phi2)))
(*.f64 phi2 phi2)
(*.f64 (fabs.f64 phi2) (fabs.f64 phi2))
(*.f64 (neg.f64 phi2) (neg.f64 phi2))
(*.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (neg.f64 phi2)))
(*.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 (fabs.f64 phi2)))
(*.f64 (fabs.f64 (fabs.f64 phi2)) (fabs.f64 (fabs.f64 phi2)))
(fabs.f64 (*.f64 phi2 phi2))
(neg.f64 (*.f64 (neg.f64 phi2) phi2))
(neg.f64 (*.f64 phi2 (neg.f64 phi2)))
(pow.f64 phi2 #s(literal 2 binary64))
(pow.f64 (neg.f64 phi2) #s(literal 2 binary64))
(pow.f64 (fabs.f64 phi2) #s(literal 2 binary64))
#s(literal -1/2 binary64)
#s(literal 1 binary64)
(fabs.f64 #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) #s(literal 0 binary64))
(/.f64 (+.f64 #s(literal 1 binary64) (exp.f64 (neg.f64 #s(literal 0 binary64)))) #s(literal 2 binary64))
(cosh.f64 #s(literal 0 binary64))
(cosh.f64 (neg.f64 #s(literal 0 binary64)))
(exp.f64 #s(literal 0 binary64))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(+.f64 (/.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (/.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) (fabs.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 lambda2) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))) (neg.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1))))
(+.f64 (sin.f64 phi2) (*.f64 (*.f64 (neg.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 (*.f64 (neg.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi2))
(+.f64 (sin.f64 phi2) (*.f64 (neg.f64 (neg.f64 #s(literal -1 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1))))
(-.f64 (*.f64 (*.f64 (neg.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (neg.f64 (sin.f64 phi2)))
(-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))
(fma.f64 (*.f64 (neg.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi2))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (neg.f64 phi1) (sin.f64 phi2))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi2) phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi2))
(fma.f64 (*.f64 (neg.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (sin.f64 phi2))
(fma.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi2))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)) #s(literal -1 binary64) (sin.f64 phi2))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)) (sin.f64 phi2))
(fma.f64 (neg.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi2))
(fma.f64 (*.f64 (cos.f64 phi2) phi1) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi2))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) phi1 (sin.f64 phi2))
(fma.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) phi1 (sin.f64 phi2))
(fma.f64 phi1 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (sin.f64 phi2))
(fma.f64 phi1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (sin.f64 phi2))
(neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)) (sin.f64 phi2)))
(*.f64 (*.f64 (neg.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (neg.f64 phi1))
(*.f64 (neg.f64 (*.f64 (cos.f64 phi2) phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (neg.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))
(*.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)) #s(literal -1 binary64))
(*.f64 (neg.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) phi1) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) phi1)
(*.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) phi1)
(*.f64 phi1 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 phi1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1 binary64)))
(/.f64 (*.f64 (neg.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))
#s(literal -1 binary64)
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1))
(*.f64 (*.f64 (cos.f64 phi2) phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) phi1)
(*.f64 (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))
(*.f64 (*.f64 (neg.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 phi2) phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)) (neg.f64 #s(literal -1 binary64)))
(*.f64 (*.f64 (*.f64 (neg.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (neg.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (neg.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) phi1))
(*.f64 (neg.f64 (neg.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (*.f64 (neg.f64 #s(literal -1 binary64)) phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (*.f64 (neg.f64 #s(literal -1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) phi1)
(*.f64 (neg.f64 phi1) (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) phi1)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) phi1)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) phi1)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) phi1)))
(+.f64 (*.f64 (*.f64 (cos.f64 phi2) phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi2) phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2)))) phi1) #s(literal 2 binary64))
(/.f64 (*.f64 phi1 (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(fma.f64 (*.f64 (cos.f64 phi2) phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (cos.f64 phi2) phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (cos.f64 phi2) phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (cos.f64 phi2) phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) phi1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) phi1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) phi1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) phi1)))
(neg.f64 (*.f64 (*.f64 (neg.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (/.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) (fabs.f64 phi2))) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) (neg.f64 phi2))) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (fabs.f64 phi2))) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 (fabs.f64 phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (fabs.f64 phi2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 (neg.f64 phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (neg.f64 phi2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (sin.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (fabs.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2)) (sin.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (fabs.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi2))) (sin.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (fabs.f64 (-.f64 lambda2 lambda1)))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (fabs.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) phi2)) (cos.f64 (-.f64 (fabs.f64 (-.f64 lambda2 lambda1)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (fabs.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (neg.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (fabs.f64 (-.f64 lambda2 lambda1)))) (cos.f64 (-.f64 (fabs.f64 phi2) (fabs.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (fabs.f64 (-.f64 lambda2 lambda1)))) (cos.f64 (-.f64 (neg.f64 phi2) (fabs.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (fabs.f64 (-.f64 lambda2 lambda1)))) (cos.f64 (-.f64 phi2 (fabs.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) (neg.f64 #s(literal 2 binary64)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 (neg.f64 lambda1))) (sin.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (neg.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2)))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda2)) (cos.f64 lambda1)))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) #s(literal 2 binary64)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (fabs.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 (neg.f64 lambda1))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 (neg.f64 lambda1))) (sin.f64 lambda2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 (neg.f64 lambda1))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (neg.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2))))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (neg.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2))))
(neg.f64 (-.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
#s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 (sin.f64 phi1)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) #s(literal -1 binary64)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 #s(literal -1 binary64) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) #s(literal -1 binary64))
(*.f64 (sin.f64 phi1) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))))
(neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 phi1)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (sin.f64 phi1)))
(+.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 phi1 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (fabs.f64 (-.f64 lambda2 lambda1)))) (sin.f64 (+.f64 phi1 (fabs.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1)) (cos.f64 (+.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 phi1 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (+.f64 phi1 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))) #s(literal 2 binary64))
(fma.f64 (sin.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (sin.f64 phi1)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))
#s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))

eval230.0ms (0.9%)

Memory
-61.0MiB live, 262.9MiB allocated; 95ms collecting garbage
Compiler

Compiled 19 879 to 6 122 computations (69.2% saved)

prune296.0ms (1.1%)

Memory
15.0MiB live, 156.4MiB allocated; 8ms collecting garbage
Pruning

133 alts after pruning (131 fresh and 2 done)

PrunedKeptTotal
New1 173691 242
Fresh336295
Picked415
Done011
Total1 2101331 343
Accuracy
99.8%
Counts
1 343 → 133
Alt Table
Click to see full alt table
StatusAccuracyProgram
78.5%
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
99.7%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
21.2%
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
42.5%
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
36.7%
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
38.9%
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
78.4%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
69.7%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 lambda2))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
49.2%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
62.6%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
35.7%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 lambda1 (PI.f64)))) (sin.f64 (+.f64 lambda2 (+.f64 lambda1 (PI.f64))))) #s(literal 2 binary64))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
78.5%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 lambda1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
44.9%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
70.9%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
99.7%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
70.9%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
88.3%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
99.7%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
71.6%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
71.4%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
79.6%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
57.2%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
59.4%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
58.6%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
81.2%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
77.2%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
63.9%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
60.2%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
56.6%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (*.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))))))
59.1%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (sin.f64 phi2)))
59.2%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))
56.6%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
51.3%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
59.0%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
51.7%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)))))
56.6%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)))))
41.6%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
41.5%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
34.3%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))))
35.2%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))) (sin.f64 phi1)))))
41.1%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 phi1)))))
40.0%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1)))))) (sin.f64 phi1)))))
43.0%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) (sin.f64 phi1)))))
45.8%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (sin.f64 phi1)))))
47.3%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 lambda1) (sin.f64 phi1))))))
32.4%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2)))))))
44.9%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
52.8%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) #s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
68.8%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 #s(approx (cos lambda1) #s(literal 1 binary64))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
67.3%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 (+.f64 lambda1 (PI.f64))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
78.8%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
68.7%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
48.1%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
39.2%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) #s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
36.2%
(atan2.f64 (*.f64 (fma.f64 #s(approx (sin lambda1) lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
99.7%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
78.4%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
51.3%
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
48.0%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
48.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (cos.f64 (-.f64 lambda1 lambda2)))))
36.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
46.7%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
28.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
45.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
29.6%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
76.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
76.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
59.6%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
63.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
59.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))))
59.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 #s(approx (- lambda1 (/ (PI) 2)) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))
47.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (- lambda2 (- lambda1 (/ (PI) 2))) (*.f64 #s(literal -1 binary64) lambda1))))))
66.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
69.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
53.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))))))
48.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
55.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
65.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
66.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))))
64.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
38.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
39.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
39.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
45.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
34.0%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
44.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) #s(approx (* phi2 (cos phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
36.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
48.0%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))))
46.0%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
47.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (neg.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
49.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))))
47.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
28.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
48.0%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 phi2) phi1))))))
27.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
28.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
39.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 phi1))))))
45.0%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
43.6%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
42.0%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
26.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
25.7%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
26.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
42.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
26.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
24.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
34.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
45.0%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
18.8%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
7.9%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
16.4%
(atan2.f64 (*.f64 (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (PI.f64))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
40.6%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
67.2%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
42.6%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
24.0%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
23.7%
(atan2.f64 (*.f64 (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
35.9%
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
36.2%
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
39.2%
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
41.0%
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
28.1%
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
36.8%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
21.7%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
36.8%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
35.8%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
22.5%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
34.2%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
29.2%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
20.9%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
53.8%
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
43.7%
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
34.0%
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
42.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Compiler

Compiled 7 160 to 4 927 computations (31.2% saved)

regimes468.0ms (1.8%)

Memory
-18.4MiB live, 164.6MiB allocated; 26ms collecting garbage
Counts
223 → 1
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) #s(approx (* phi2 (cos phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 phi2) phi1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (neg.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 #s(approx (sin lambda1) lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) #s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 lambda1) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (- lambda2 (- lambda1 (/ (PI) 2))) (*.f64 #s(literal -1 binary64) lambda1))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (PI.f64))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 #s(approx (- lambda1 (/ (PI) 2)) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))))
(atan2.f64 (*.f64 (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 lambda1 (PI.f64)))) (sin.f64 (+.f64 lambda2 (+.f64 lambda1 (PI.f64))))) #s(literal 2 binary64))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 lambda1 lambda2) (-.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (sin.f64 lambda1))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1)))))) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 (+.f64 lambda1 (PI.f64))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 (+.f64 lambda1 (PI.f64))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 lambda2))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda1) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (+.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) #s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) #s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 lambda1 (PI.f64)))) (sin.f64 (+.f64 lambda2 (+.f64 lambda1 (PI.f64))))) #s(literal 2 binary64))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) #s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (*.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))))))
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 #s(approx (cos lambda1) #s(literal 1 binary64))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 lambda1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 lambda1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
Outputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
Calls

6 calls:

100.0ms
(-.f64 lambda1 lambda2)
82.0ms
phi2
79.0ms
lambda2
66.0ms
lambda1
64.0ms
phi1
Results
AccuracySegmentsBranch
99.7%1(-.f64 lambda1 lambda2)
99.7%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
99.7%1lambda1
99.7%1lambda2
99.7%1phi1
99.7%1phi2
Compiler

Compiled 26 to 38 computations (-46.2% saved)

regimes418.0ms (1.6%)

Memory
4.2MiB live, 152.7MiB allocated; 10ms collecting garbage
Counts
222 → 1
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) #s(approx (* phi2 (cos phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 phi2) phi1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (neg.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 #s(approx (sin lambda1) lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) #s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 lambda1) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (- lambda2 (- lambda1 (/ (PI) 2))) (*.f64 #s(literal -1 binary64) lambda1))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (PI.f64))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 #s(approx (- lambda1 (/ (PI) 2)) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))))
(atan2.f64 (*.f64 (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 lambda1 (PI.f64)))) (sin.f64 (+.f64 lambda2 (+.f64 lambda1 (PI.f64))))) #s(literal 2 binary64))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 lambda1 lambda2) (-.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (sin.f64 lambda1))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1)))))) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 (+.f64 lambda1 (PI.f64))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 (+.f64 lambda1 (PI.f64))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 lambda2))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda1) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (+.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) #s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) #s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 lambda1 (PI.f64)))) (sin.f64 (+.f64 lambda2 (+.f64 lambda1 (PI.f64))))) #s(literal 2 binary64))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) #s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (*.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))))))
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 #s(approx (cos lambda1) #s(literal 1 binary64))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 lambda1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 lambda1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
Outputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
Calls

6 calls:

121.0ms
lambda1
64.0ms
phi2
58.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
55.0ms
(-.f64 lambda1 lambda2)
54.0ms
phi1
Results
AccuracySegmentsBranch
99.7%1(-.f64 lambda1 lambda2)
99.7%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
99.7%1lambda1
99.7%1lambda2
99.7%1phi1
99.7%1phi2
Compiler

Compiled 26 to 38 computations (-46.2% saved)

regimes372.0ms (1.4%)

Memory
-11.1MiB live, 325.3MiB allocated; 58ms collecting garbage
Counts
220 → 1
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) #s(approx (* phi2 (cos phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 phi2) phi1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (neg.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 #s(approx (sin lambda1) lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) #s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 lambda1) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (- lambda2 (- lambda1 (/ (PI) 2))) (*.f64 #s(literal -1 binary64) lambda1))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (PI.f64))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 #s(approx (- lambda1 (/ (PI) 2)) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))))
(atan2.f64 (*.f64 (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 lambda1 (PI.f64)))) (sin.f64 (+.f64 lambda2 (+.f64 lambda1 (PI.f64))))) #s(literal 2 binary64))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 lambda1 lambda2) (-.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (sin.f64 lambda1))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1)))))) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 (+.f64 lambda1 (PI.f64))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 (+.f64 lambda1 (PI.f64))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 lambda2))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda1) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (+.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) #s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) #s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 lambda1 (PI.f64)))) (sin.f64 (+.f64 lambda2 (+.f64 lambda1 (PI.f64))))) #s(literal 2 binary64))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) #s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (*.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))))))
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 #s(approx (cos lambda1) #s(literal 1 binary64))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 lambda1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 lambda1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
Outputs
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
Calls

6 calls:

67.0ms
(-.f64 lambda1 lambda2)
65.0ms
lambda2
62.0ms
lambda1
61.0ms
phi2
53.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Results
AccuracySegmentsBranch
99.7%1(-.f64 lambda1 lambda2)
99.7%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
99.7%1lambda1
99.7%1lambda2
99.7%1phi1
99.7%1phi2
Compiler

Compiled 26 to 38 computations (-46.2% saved)

regimes352.0ms (1.3%)

Memory
2.9MiB live, 430.6MiB allocated; 42ms collecting garbage
Counts
218 → 1
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) #s(approx (* phi2 (cos phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 phi2) phi1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (neg.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 #s(approx (sin lambda1) lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) #s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 lambda1) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (- lambda2 (- lambda1 (/ (PI) 2))) (*.f64 #s(literal -1 binary64) lambda1))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (PI.f64))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 #s(approx (- lambda1 (/ (PI) 2)) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))))
(atan2.f64 (*.f64 (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 lambda1 (PI.f64)))) (sin.f64 (+.f64 lambda2 (+.f64 lambda1 (PI.f64))))) #s(literal 2 binary64))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 lambda1 lambda2) (-.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (sin.f64 lambda1))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1)))))) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 (+.f64 lambda1 (PI.f64))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 (+.f64 lambda1 (PI.f64))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 lambda2))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda1) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (+.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) #s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) #s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 lambda1 (PI.f64)))) (sin.f64 (+.f64 lambda2 (+.f64 lambda1 (PI.f64))))) #s(literal 2 binary64))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) #s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (*.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))))))
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 #s(approx (cos lambda1) #s(literal 1 binary64))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 lambda1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 lambda1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
Outputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
Calls

6 calls:

64.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
60.0ms
lambda2
56.0ms
lambda1
54.0ms
(-.f64 lambda1 lambda2)
53.0ms
phi2
Results
AccuracySegmentsBranch
99.7%1(-.f64 lambda1 lambda2)
99.7%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
99.7%1lambda1
99.7%1lambda2
99.7%1phi1
99.7%1phi2
Compiler

Compiled 26 to 38 computations (-46.2% saved)

regimes388.0ms (1.5%)

Memory
-5.4MiB live, 375.8MiB allocated; 87ms collecting garbage
Counts
212 → 1
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) #s(approx (* phi2 (cos phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 phi2) phi1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (neg.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 #s(approx (sin lambda1) lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) #s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 lambda1) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (- lambda2 (- lambda1 (/ (PI) 2))) (*.f64 #s(literal -1 binary64) lambda1))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (PI.f64))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 #s(approx (- lambda1 (/ (PI) 2)) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))))
(atan2.f64 (*.f64 (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 lambda1 (PI.f64)))) (sin.f64 (+.f64 lambda2 (+.f64 lambda1 (PI.f64))))) #s(literal 2 binary64))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 lambda1 lambda2) (-.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (sin.f64 lambda1))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1)))))) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 (+.f64 lambda1 (PI.f64))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 (+.f64 lambda1 (PI.f64))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 lambda2))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda1) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (+.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) #s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) #s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 lambda1 (PI.f64)))) (sin.f64 (+.f64 lambda2 (+.f64 lambda1 (PI.f64))))) #s(literal 2 binary64))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) #s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (*.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))))))
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 #s(approx (cos lambda1) #s(literal 1 binary64))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
Outputs
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
Calls

6 calls:

85.0ms
phi1
75.0ms
lambda1
65.0ms
phi2
51.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
50.0ms
(-.f64 lambda1 lambda2)
Results
AccuracySegmentsBranch
99.7%1(-.f64 lambda1 lambda2)
99.7%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
99.7%1lambda1
99.7%1lambda2
99.7%1phi1
99.7%1phi2
Compiler

Compiled 26 to 38 computations (-46.2% saved)

regimes348.0ms (1.3%)

Memory
20.6MiB live, 200.5MiB allocated; 15ms collecting garbage
Counts
211 → 3
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) #s(approx (* phi2 (cos phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 phi2) phi1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (neg.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 #s(approx (sin lambda1) lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) #s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 lambda1) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (- lambda2 (- lambda1 (/ (PI) 2))) (*.f64 #s(literal -1 binary64) lambda1))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (PI.f64))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 #s(approx (- lambda1 (/ (PI) 2)) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))))
(atan2.f64 (*.f64 (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 lambda1 (PI.f64)))) (sin.f64 (+.f64 lambda2 (+.f64 lambda1 (PI.f64))))) #s(literal 2 binary64))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 lambda1 lambda2) (-.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (sin.f64 lambda1))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1)))))) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 (+.f64 lambda1 (PI.f64))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 (+.f64 lambda1 (PI.f64))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 lambda2))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda1) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (+.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) #s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) #s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 lambda1 (PI.f64)))) (sin.f64 (+.f64 lambda2 (+.f64 lambda1 (PI.f64))))) #s(literal 2 binary64))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) #s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (*.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))))))
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 #s(approx (cos lambda1) #s(literal 1 binary64))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (fma.f64 (sin.f64 phi2) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
Outputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (*.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Calls

6 calls:

82.0ms
lambda2
55.0ms
phi2
52.0ms
lambda1
52.0ms
(-.f64 lambda1 lambda2)
50.0ms
phi1
Results
AccuracySegmentsBranch
88.3%1(-.f64 lambda1 lambda2)
88.3%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
88.3%1lambda1
88.3%1lambda2
88.3%1phi1
93.4%3phi2
Compiler

Compiled 26 to 38 computations (-46.2% saved)

regimes60.0ms (0.2%)

Memory
-8.3MiB live, 38.1MiB allocated; 1ms collecting garbage
Counts
199 → 3
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) #s(approx (* phi2 (cos phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 phi2) phi1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (neg.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 #s(approx (sin lambda1) lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) #s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 lambda1) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (- lambda2 (- lambda1 (/ (PI) 2))) (*.f64 #s(literal -1 binary64) lambda1))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (PI.f64))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 #s(approx (- lambda1 (/ (PI) 2)) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))))
(atan2.f64 (*.f64 (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 lambda1 (PI.f64)))) (sin.f64 (+.f64 lambda2 (+.f64 lambda1 (PI.f64))))) #s(literal 2 binary64))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 lambda1 lambda2) (-.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (sin.f64 lambda1))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1)))))) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 (+.f64 lambda1 (PI.f64))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 (+.f64 lambda1 (PI.f64))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 lambda2))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda1) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (+.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) #s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) #s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 lambda1 (PI.f64)))) (sin.f64 (+.f64 lambda2 (+.f64 lambda1 (PI.f64))))) #s(literal 2 binary64))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) #s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (*.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))))))
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Outputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (*.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Calls

1 calls:

48.0ms
phi2
Results
AccuracySegmentsBranch
93.3%3phi2
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes56.0ms (0.2%)

Memory
33.7MiB live, 33.7MiB allocated; 0ms collecting garbage
Counts
197 → 3
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) #s(approx (* phi2 (cos phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 phi2) phi1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (neg.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 #s(approx (sin lambda1) lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) #s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 lambda1) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (- lambda2 (- lambda1 (/ (PI) 2))) (*.f64 #s(literal -1 binary64) lambda1))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (PI.f64))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 #s(approx (- lambda1 (/ (PI) 2)) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))))
(atan2.f64 (*.f64 (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 lambda1 (PI.f64)))) (sin.f64 (+.f64 lambda2 (+.f64 lambda1 (PI.f64))))) #s(literal 2 binary64))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 lambda1 lambda2) (-.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (sin.f64 lambda1))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1)))))) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 (+.f64 lambda1 (PI.f64))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 (+.f64 lambda1 (PI.f64))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 lambda2))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda1) (cos.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (/.f64 (+.f64 (sin.f64 (-.f64 phi2 phi1)) (sin.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (sin.f64 (+.f64 (neg.f64 lambda2) (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (+.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) #s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) #s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 lambda1 (PI.f64)))) (sin.f64 (+.f64 lambda2 (+.f64 lambda1 (PI.f64))))) #s(literal 2 binary64))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) #s(approx (sin lambda2) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/6 binary64)))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
Outputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Calls

1 calls:

47.0ms
phi2
Results
AccuracySegmentsBranch
93.3%3phi2
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes57.0ms (0.2%)

Memory
-13.3MiB live, 38.2MiB allocated; 5ms collecting garbage
Counts
172 → 3
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) #s(approx (* phi2 (cos phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 phi2) phi1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (neg.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 #s(approx (sin lambda1) lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) #s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 lambda1) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (- lambda2 (- lambda1 (/ (PI) 2))) (*.f64 #s(literal -1 binary64) lambda1))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (PI.f64))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 #s(approx (- lambda1 (/ (PI) 2)) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))))
(atan2.f64 (*.f64 (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 lambda1 (PI.f64)))) (sin.f64 (+.f64 lambda2 (+.f64 lambda1 (PI.f64))))) #s(literal 2 binary64))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 lambda1 lambda2) (-.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (sin.f64 lambda1))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1)))))) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 (+.f64 lambda1 (PI.f64))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Outputs
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Calls

1 calls:

49.0ms
phi2
Results
AccuracySegmentsBranch
93.3%3phi2
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes320.0ms (1.2%)

Memory
-7.2MiB live, 238.5MiB allocated; 65ms collecting garbage
Counts
171 → 3
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) #s(approx (* phi2 (cos phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 phi2) phi1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (neg.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 #s(approx (sin lambda1) lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) #s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 lambda1) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (- lambda2 (- lambda1 (/ (PI) 2))) (*.f64 #s(literal -1 binary64) lambda1))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (PI.f64))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 #s(approx (- lambda1 (/ (PI) 2)) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))))
(atan2.f64 (*.f64 (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 lambda1 (PI.f64)))) (sin.f64 (+.f64 lambda2 (+.f64 lambda1 (PI.f64))))) #s(literal 2 binary64))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 lambda1 lambda2) (-.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (sin.f64 lambda1))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1)))))) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 (+.f64 lambda1 (PI.f64))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
Outputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
Calls

6 calls:

70.0ms
lambda2
68.0ms
(-.f64 lambda1 lambda2)
46.0ms
lambda1
45.0ms
phi2
42.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Results
AccuracySegmentsBranch
83.2%2(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
88.3%3lambda2
85.4%3(-.f64 lambda1 lambda2)
88.5%3lambda1
89.1%4phi1
90.2%3phi2
Compiler

Compiled 26 to 38 computations (-46.2% saved)

regimes109.0ms (0.4%)

Memory
18.7MiB live, 109.8MiB allocated; 5ms collecting garbage
Counts
169 → 3
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) #s(approx (* phi2 (cos phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 phi2) phi1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (neg.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 #s(approx (sin lambda1) lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) #s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 lambda1) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (- lambda2 (- lambda1 (/ (PI) 2))) (*.f64 #s(literal -1 binary64) lambda1))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (PI.f64))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 #s(approx (- lambda1 (/ (PI) 2)) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))))
(atan2.f64 (*.f64 (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 lambda1 (PI.f64)))) (sin.f64 (+.f64 lambda2 (+.f64 lambda1 (PI.f64))))) #s(literal 2 binary64))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 lambda1 lambda2) (-.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (sin.f64 lambda1))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1)))))) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 (+.f64 lambda1 (PI.f64))) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
Outputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
Calls

2 calls:

59.0ms
lambda1
42.0ms
phi2
Results
AccuracySegmentsBranch
88.5%3lambda1
85.4%3phi2
Compiler

Compiled 2 to 8 computations (-300% saved)

regimes91.0ms (0.3%)

Memory
4.8MiB live, 101.4MiB allocated; 8ms collecting garbage
Counts
159 → 3
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) #s(approx (* phi2 (cos phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 phi2) phi1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (neg.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 #s(approx (sin lambda1) lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) #s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 lambda1) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (- lambda2 (- lambda1 (/ (PI) 2))) (*.f64 #s(literal -1 binary64) lambda1))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (PI.f64))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 #s(approx (- lambda1 (/ (PI) 2)) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))))
(atan2.f64 (*.f64 (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 lambda1 (PI.f64)))) (sin.f64 (+.f64 lambda2 (+.f64 lambda1 (PI.f64))))) #s(literal 2 binary64))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 lambda1 lambda2) (-.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (sin.f64 lambda1))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1)))))) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
Outputs
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (sin.f64 lambda1))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
Calls

2 calls:

42.0ms
lambda1
40.0ms
lambda2
Results
AccuracySegmentsBranch
88.3%3lambda2
84.3%3lambda1
Compiler

Compiled 2 to 8 computations (-300% saved)

regimes98.0ms (0.4%)

Memory
20.0MiB live, 109.9MiB allocated; 7ms collecting garbage
Counts
158 → 3
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) #s(approx (* phi2 (cos phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 phi2) phi1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (neg.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 #s(approx (sin lambda1) lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) #s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 lambda1) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (- lambda2 (- lambda1 (/ (PI) 2))) (*.f64 #s(literal -1 binary64) lambda1))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (PI.f64))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 #s(approx (- lambda1 (/ (PI) 2)) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))))
(atan2.f64 (*.f64 (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 lambda1 (PI.f64)))) (sin.f64 (+.f64 lambda2 (+.f64 lambda1 (PI.f64))))) #s(literal 2 binary64))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 lambda1 lambda2) (-.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (sin.f64 lambda1))))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 lambda1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2)))) (sin.f64 (neg.f64 lambda2)))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda1)))))) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
Outputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Calls

2 calls:

49.0ms
phi1
41.0ms
lambda2
Results
AccuracySegmentsBranch
87.2%3phi1
85.0%2lambda2
Compiler

Compiled 2 to 8 computations (-300% saved)

regimes58.0ms (0.2%)

Memory
-29.7MiB live, 72.3MiB allocated; 6ms collecting garbage
Counts
148 → 3
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) #s(approx (* phi2 (cos phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 phi2) phi1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (neg.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 #s(approx (sin lambda1) lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) #s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 lambda1) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (- lambda2 (- lambda1 (/ (PI) 2))) (*.f64 #s(literal -1 binary64) lambda1))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (PI.f64))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 #s(approx (- lambda1 (/ (PI) 2)) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))))
(atan2.f64 (*.f64 (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 lambda1 (PI.f64)))) (sin.f64 (+.f64 lambda2 (+.f64 lambda1 (PI.f64))))) #s(literal 2 binary64))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 lambda1 lambda2) (-.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
Outputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
Calls

1 calls:

37.0ms
phi1
Results
AccuracySegmentsBranch
86.7%3phi1
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes57.0ms (0.2%)

Memory
10.0MiB live, 51.3MiB allocated; 5ms collecting garbage
Counts
144 → 3
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) #s(approx (* phi2 (cos phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 phi2) phi1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (neg.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 #s(approx (sin lambda1) lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) #s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 lambda1) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (- lambda2 (- lambda1 (/ (PI) 2))) (*.f64 #s(literal -1 binary64) lambda1))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (PI.f64))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 #s(approx (- lambda1 (/ (PI) 2)) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))))
(atan2.f64 (*.f64 (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 lambda1 (PI.f64)))) (sin.f64 (+.f64 lambda2 (+.f64 lambda1 (PI.f64))))) #s(literal 2 binary64))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 lambda1 lambda2) (-.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 phi2 #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
Outputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
Calls

1 calls:

49.0ms
phi1
Results
AccuracySegmentsBranch
86.6%3phi1
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes259.0ms (1%)

Memory
-0.2MiB live, 141.1MiB allocated; 9ms collecting garbage
Counts
139 → 3
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) #s(approx (* phi2 (cos phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 phi2) phi1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (neg.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 #s(approx (sin lambda1) lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) #s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 lambda1) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (- lambda2 (- lambda1 (/ (PI) 2))) (*.f64 #s(literal -1 binary64) lambda1))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (PI.f64))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 #s(approx (- lambda1 (/ (PI) 2)) (*.f64 #s(literal -1/2 binary64) (PI.f64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))))))
(atan2.f64 (*.f64 (cos.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (/.f64 (+.f64 (sin.f64 (-.f64 lambda2 (+.f64 lambda1 (PI.f64)))) (sin.f64 (+.f64 lambda2 (+.f64 lambda1 (PI.f64))))) #s(literal 2 binary64))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi2)))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi1 phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 phi2 phi1) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 (-.f64 lambda1 lambda2) (-.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Outputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
Calls

5 calls:

43.0ms
phi1
42.0ms
phi2
37.0ms
(-.f64 lambda1 lambda2)
37.0ms
lambda2
34.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Results
AccuracySegmentsBranch
76.3%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
81.4%3(-.f64 lambda1 lambda2)
76.3%1phi2
82.7%2lambda2
84.6%3phi1
Compiler

Compiled 25 to 34 computations (-36% saved)

regimes39.0ms (0.2%)

Memory
22.4MiB live, 22.4MiB allocated; 0ms collecting garbage
Counts
100 → 3
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) #s(approx (* phi2 (cos phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 phi2) phi1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (neg.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 #s(approx (sin lambda1) lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) #s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 lambda1) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (- lambda2 (- lambda1 (/ (PI) 2))) (*.f64 #s(literal -1 binary64) lambda1))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
Outputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
Calls

1 calls:

31.0ms
phi1
Results
AccuracySegmentsBranch
84.6%3phi1
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes32.0ms (0.1%)

Memory
-21.0MiB live, 26.2MiB allocated; 1ms collecting garbage
Counts
99 → 3
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) #s(approx (* phi2 (cos phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 phi2) phi1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (neg.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 #s(approx (sin lambda1) lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) #s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 lambda1) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (- lambda2 (- lambda1 (/ (PI) 2))) (*.f64 #s(literal -1 binary64) lambda1))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
Outputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Calls

1 calls:

25.0ms
phi1
Results
AccuracySegmentsBranch
84.6%3phi1
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes116.0ms (0.4%)

Memory
1.5MiB live, 47.6MiB allocated; 3ms collecting garbage
Counts
96 → 3
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) #s(approx (* phi2 (cos phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 phi2) phi1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (neg.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 #s(approx (sin lambda1) lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) #s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 lambda1) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))) (sin.f64 phi1)))))
Outputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 phi1))))))
Calls

3 calls:

54.0ms
lambda2
28.0ms
lambda1
26.0ms
phi1
Results
AccuracySegmentsBranch
82.7%3lambda2
77.9%3lambda1
79.1%4phi1
Compiler

Compiled 3 to 12 computations (-300% saved)

regimes31.0ms (0.1%)

Memory
23.6MiB live, 23.6MiB allocated; 0ms collecting garbage
Counts
92 → 3
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) #s(approx (* phi2 (cos phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 phi2) phi1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (neg.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 #s(approx (sin lambda1) lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) #s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 (cos.f64 lambda1) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Outputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))
Calls

1 calls:

25.0ms
lambda2
Results
AccuracySegmentsBranch
82.7%3lambda2
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes106.0ms (0.4%)

Memory
-34.0MiB live, 26.1MiB allocated; 73ms collecting garbage
Counts
87 → 3
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) #s(approx (* phi2 (cos phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 phi2) phi1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (neg.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 #s(approx (sin lambda1) lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) #s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
Outputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
Calls

2 calls:

37.0ms
lambda2
21.0ms
(-.f64 lambda1 lambda2)
Results
AccuracySegmentsBranch
75.1%3(-.f64 lambda1 lambda2)
80.7%3lambda2
Compiler

Compiled 4 to 9 computations (-125% saved)

regimes152.0ms (0.6%)

Memory
-23.8MiB live, 71.4MiB allocated; 9ms collecting garbage
Counts
86 → 3
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) #s(approx (* phi2 (cos phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 phi2) phi1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (neg.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 #s(approx (sin lambda1) lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) #s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))) (cos.f64 lambda2)))))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Outputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
Calls

5 calls:

52.0ms
phi2
24.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
23.0ms
lambda1
23.0ms
phi1
21.0ms
lambda2
Results
AccuracySegmentsBranch
75.4%4phi1
74.0%4lambda1
70.3%4(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
75.4%3phi2
74.3%3lambda2
Compiler

Compiled 23 to 33 computations (-43.5% saved)

regimes63.0ms (0.2%)

Memory
33.9MiB live, 33.9MiB allocated; 0ms collecting garbage
Counts
78 → 2
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) #s(approx (* phi2 (cos phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 phi2) phi1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (neg.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 #s(approx (neg (cos lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) #s(literal 1 binary64)) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (sin phi1) (cos phi2)) (*.f64 phi1 (cos.f64 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 #s(approx (sin lambda1) lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) #s(approx (* (cos (- lambda1 lambda2)) (sin phi1)) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2))))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) #s(approx (* (neg (cos lambda1)) (sin lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) #s(approx (+ (cos lambda1) (* lambda2 (sin lambda1))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (sin phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 phi1))) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 phi2))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (+.f64 (cos.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (sin.f64 lambda2))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (sin.f64 (-.f64 lambda2 (-.f64 lambda1 (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (+.f64 (cos.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Outputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
Calls

3 calls:

19.0ms
phi2
19.0ms
(-.f64 lambda1 lambda2)
19.0ms
lambda2
Results
AccuracySegmentsBranch
72.5%2lambda2
73.9%4(-.f64 lambda1 lambda2)
73.9%3phi2
Compiler

Compiled 5 to 13 computations (-160% saved)

regimes60.0ms (0.2%)

Memory
-19.5MiB live, 27.2MiB allocated; 1ms collecting garbage
Counts
56 → 3
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) #s(approx (* phi2 (cos phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 phi2) phi1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (neg.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda1) (sin lambda2))))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (+ (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))))) (sin.f64 phi2)))
Outputs
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
Calls

3 calls:

24.0ms
lambda2
17.0ms
phi1
15.0ms
phi2
Results
AccuracySegmentsBranch
73.6%3phi2
72.1%3phi1
64.3%4lambda2
Compiler

Compiled 3 to 12 computations (-300% saved)

regimes73.0ms (0.3%)

Memory
14.8MiB live, 63.2MiB allocated; 4ms collecting garbage
Counts
53 → 3
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) #s(approx (* phi2 (cos phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 phi2) phi1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (neg.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))))
Outputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
Calls

5 calls:

16.0ms
phi1
14.0ms
lambda1
14.0ms
(-.f64 lambda1 lambda2)
14.0ms
phi2
13.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Results
AccuracySegmentsBranch
52.5%3(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
63.9%3phi1
52.4%2(-.f64 lambda1 lambda2)
51.1%2lambda1
64.7%3phi2
Compiler

Compiled 25 to 34 computations (-36% saved)

regimes24.0ms (0.1%)

Memory
-18.8MiB live, 22.6MiB allocated; 7ms collecting garbage
Counts
49 → 3
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) #s(approx (* phi2 (cos phi1)) phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 #s(approx (* (cos phi1) (sin phi2)) (*.f64 phi2 (cos.f64 phi1))) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (fma.f64 #s(literal -1 binary64) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 lambda1))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 phi2) phi1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (neg.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)))))
Outputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
Calls

1 calls:

21.0ms
phi2
Results
AccuracySegmentsBranch
64.6%3phi2
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes12.0ms (0%)

Memory
13.5MiB live, 13.5MiB allocated; 0ms collecting garbage
Counts
40 → 3
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
Outputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
Calls

1 calls:

10.0ms
phi2
Results
AccuracySegmentsBranch
64.5%3phi2
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes12.0ms (0%)

Memory
17.3MiB live, 17.3MiB allocated; 0ms collecting garbage
Counts
39 → 3
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 2 binary64)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
Outputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (-.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
Calls

1 calls:

10.0ms
phi2
Results
AccuracySegmentsBranch
64.5%3phi2
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes35.0ms (0.1%)

Memory
-8.4MiB live, 29.0MiB allocated; 16ms collecting garbage
Counts
33 → 3
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (*.f64 #s(literal -1 binary64) (sin.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (sin (- lambda2 (- lambda1 (/ (PI) 2)))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))
Outputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
Calls

2 calls:

24.0ms
phi2
9.0ms
phi1
Results
AccuracySegmentsBranch
62.3%3phi1
63.6%3phi2
Compiler

Compiled 2 to 8 computations (-300% saved)

regimes9.0ms (0%)

Memory
13.6MiB live, 13.6MiB allocated; 0ms collecting garbage
Counts
29 → 3
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 #s(approx (* (+ (* (sin lambda1) (cos lambda2)) (* (neg (cos lambda1)) (sin lambda2))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
Outputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
Calls

1 calls:

8.0ms
phi2
Results
AccuracySegmentsBranch
63.6%3phi2
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes62.0ms (0.2%)

Memory
10.0MiB live, 51.9MiB allocated; 15ms collecting garbage
Counts
24 → 1
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) phi2))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 (neg.f64 phi2) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ 1 (* -1/2 (pow phi2 2))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (sin phi2) (* -1 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))))) (+.f64 phi2 (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 lambda1 lambda2))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 (neg.f64 lambda2))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
Outputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
Calls

6 calls:

28.0ms
phi1
7.0ms
(-.f64 lambda1 lambda2)
6.0ms
lambda1
6.0ms
lambda2
6.0ms
phi2
Results
AccuracySegmentsBranch
47.4%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
47.4%1lambda1
47.4%1(-.f64 lambda1 lambda2)
47.4%1phi1
47.4%1lambda2
47.4%1phi2
Compiler

Compiled 26 to 38 computations (-46.2% saved)

regimes54.0ms (0.2%)

Memory
-15.5MiB live, 38.1MiB allocated; 21ms collecting garbage
Counts
12 → 2
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
Outputs
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
Calls

6 calls:

23.0ms
(-.f64 lambda1 lambda2)
7.0ms
lambda1
7.0ms
lambda2
7.0ms
phi2
4.0ms
phi1
Results
AccuracySegmentsBranch
35.9%3lambda1
35.1%2phi2
34.9%3lambda2
31.3%2(-.f64 lambda1 lambda2)
32.9%3(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
29.2%1phi1
Compiler

Compiled 26 to 38 computations (-46.2% saved)

regimes28.0ms (0.1%)

Memory
-19.1MiB live, 26.9MiB allocated; 3ms collecting garbage
Counts
10 → 2
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
Outputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
Calls

5 calls:

7.0ms
(-.f64 lambda1 lambda2)
6.0ms
phi2
6.0ms
lambda1
4.0ms
lambda2
3.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Results
AccuracySegmentsBranch
28.5%1(-.f64 lambda1 lambda2)
28.5%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
30.1%2lambda2
28.5%1lambda1
31.1%2phi2
Compiler

Compiled 25 to 34 computations (-36% saved)

regimes18.0ms (0.1%)

Memory
31.3MiB live, 31.3MiB allocated; 0ms collecting garbage
Counts
9 → 2
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
Outputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/120 binary64) (pow.f64 phi2 #s(literal 2 binary64))) #s(literal 1/6 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
Calls

6 calls:

3.0ms
phi2
3.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
3.0ms
phi1
3.0ms
lambda1
3.0ms
(-.f64 lambda1 lambda2)
Results
AccuracySegmentsBranch
26.8%1(-.f64 lambda1 lambda2)
26.8%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
26.8%1lambda1
26.8%1lambda2
26.8%1phi1
28.4%2phi2
Compiler

Compiled 26 to 38 computations (-46.2% saved)

regimes6.0ms (0%)

Memory
10.5MiB live, 10.5MiB allocated; 0ms collecting garbage
Accuracy

Total -14.2b remaining (-30.2%)

Threshold costs -14.2b (-30.2%)

Counts
8 → 1
Calls
Call 1
Inputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) #s(approx (+ (* (* phi2 phi2) -1/2) 1) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 (neg.f64 lambda2))) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (sin.f64 phi2)))
Outputs
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) #s(approx (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda2 lambda1)))) #s(approx (sin phi2) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 phi2 #s(literal 2 binary64))))))))
Calls

2 calls:

3.0ms
phi2
3.0ms
(-.f64 lambda1 lambda2)
Results
AccuracySegmentsBranch
26.8%1(-.f64 lambda1 lambda2)
26.8%1phi2
Compiler

Compiled 4 to 9 computations (-125% saved)

bsearch142.0ms (0.5%)

Memory
-33.9MiB live, 111.3MiB allocated; 10ms collecting garbage
Algorithm
binary-search
Stop Event
predicate-same
narrow-enough
Steps
TimeLeftRight
42.0ms
2.8790984916771606e-84
3.2621224515937674e-82
92.0ms
-2.817706172636473e-17
-1.5907972621619486e-27
Samples
113.0ms159×1valid
11.0ms65×0valid
Compiler

Compiled 1 015 to 910 computations (10.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 116.0ms
ival-sin: 49.0ms (42.4% of total)
ival-cos: 43.0ms (37.2% of total)
ival-mult!: 9.0ms (7.8% of total)
adjust: 8.0ms (6.9% of total)
ival-atan2: 4.0ms (3.5% of total)
ival-sub!: 2.0ms (1.7% of total)

bsearch4.0ms (0%)

Memory
2.3MiB live, 2.3MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
predicate-same
narrow-enough
Steps
TimeLeftRight
1.0ms
2.8790984916771606e-84
3.2621224515937674e-82
2.0ms
-2.817706172636473e-17
-1.5907972621619486e-27
Compiler

Compiled 1 007 to 906 computations (10% saved)

bsearch4.0ms (0%)

Memory
2.8MiB live, 2.8MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
predicate-same
narrow-enough
Steps
TimeLeftRight
1.0ms
2.8790984916771606e-84
3.2621224515937674e-82
2.0ms
-2.817706172636473e-17
-1.5907972621619486e-27
Compiler

Compiled 853 to 808 computations (5.3% saved)

bsearch4.0ms (0%)

Memory
3.0MiB live, 3.0MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
predicate-same
narrow-enough
Steps
TimeLeftRight
1.0ms
2.8790984916771606e-84
3.2621224515937674e-82
2.0ms
-2.817706172636473e-17
-1.5907972621619486e-27
Compiler

Compiled 853 to 808 computations (5.3% saved)

bsearch69.0ms (0.3%)

Memory
9.4MiB live, 55.8MiB allocated; 3ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
63.0ms
3.0402960310293874e-11
1.37858059471673e-8
2.0ms
-2.817706172636473e-17
-1.5907972621619486e-27
Samples
51.0ms83×1valid
6.0ms45×0valid
Compiler

Compiled 1 197 to 1 122 computations (6.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 52.0ms
ival-cos: 21.0ms (40.4% of total)
ival-sin: 19.0ms (36.5% of total)
adjust: 4.0ms (7.7% of total)
ival-mult!: 4.0ms (7.7% of total)
ival-atan2: 2.0ms (3.8% of total)
ival-sub!: 1.0ms (1.9% of total)

bsearch119.0ms (0.5%)

Memory
10.3MiB live, 56.5MiB allocated; 4ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
46.0ms
0.09159227739601535
14.703079640516725
66.0ms
-333.6582544031726
-5.240077808698352e-7
Samples
74.0ms113×1valid
24.0ms143×0valid
Compiler

Compiled 955 to 920 computations (3.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 89.0ms
ival-sin: 35.0ms (39.2% of total)
ival-cos: 35.0ms (39.2% of total)
ival-mult!: 7.0ms (7.8% of total)
adjust: 6.0ms (6.7% of total)
ival-atan2: 4.0ms (4.5% of total)
ival-sub!: 2.0ms (2.2% of total)

bsearch125.0ms (0.5%)

Memory
9.1MiB live, 106.9MiB allocated; 27ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
102.0ms
3.213784245510854e-16
13990205.13507029
17.0ms
-0.024044102903169363
-0.0215869418247423
Samples
73.0ms103×1valid
36.0ms105×0valid
Compiler

Compiled 820 to 791 computations (3.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 102.0ms
ival-sin: 51.0ms (50% of total)
ival-cos: 35.0ms (34.3% of total)
ival-mult!: 6.0ms (5.9% of total)
adjust: 5.0ms (4.9% of total)
ival-atan2: 4.0ms (3.9% of total)
ival-sub!: 2.0ms (2% of total)

bsearch206.0ms (0.8%)

Memory
-13.5MiB live, 68.9MiB allocated; 38ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
78.0ms
0.0003642444898890151
0.055428714483642574
121.0ms
-1.2677884530568746e+69
-8.679444636920217e+67
Samples
178.0ms154×1valid
10.0ms54×0valid
Compiler

Compiled 742 to 752 computations (-1.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 164.0ms
ival-cos: 97.0ms (59.3% of total)
ival-sin: 43.0ms (26.3% of total)
adjust: 8.0ms (4.9% of total)
ival-mult!: 8.0ms (4.9% of total)
ival-atan2: 5.0ms (3.1% of total)
ival-sub!: 2.0ms (1.2% of total)

bsearch4.0ms (0%)

Memory
1.7MiB live, 1.7MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
0.0003642444898890151
0.055428714483642574
1.0ms
-1.2677884530568746e+69
-8.679444636920217e+67
Compiler

Compiled 651 to 648 computations (0.5% saved)

bsearch107.0ms (0.4%)

Memory
-19.0MiB live, 27.7MiB allocated; 4ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
0.0003642444898890151
0.055428714483642574
79.0ms
-26999.10973319384
-0.3196167228089592
Samples
63.0ms92×1valid
9.0ms52×0valid
Compiler

Compiled 875 to 856 computations (2.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 66.0ms
ival-cos: 27.0ms (40.8% of total)
ival-sin: 25.0ms (37.8% of total)
adjust: 5.0ms (7.6% of total)
ival-mult!: 5.0ms (7.6% of total)
ival-atan2: 4.0ms (6% of total)
ival-sub!: 1.0ms (1.5% of total)

bsearch92.0ms (0.4%)

Memory
29.5MiB live, 29.5MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
86.0ms
9.532287706021186e-37
1.107366768877641e-30
1.0ms
-26999.10973319384
-0.3196167228089592
Samples
74.0ms103×1valid
6.0ms41×0valid
Compiler

Compiled 837 to 834 computations (0.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 74.0ms
ival-sin: 34.0ms (45.7% of total)
ival-cos: 26.0ms (34.9% of total)
adjust: 5.0ms (6.7% of total)
ival-mult!: 5.0ms (6.7% of total)
ival-atan2: 4.0ms (5.4% of total)
ival-sub!: 1.0ms (1.3% of total)

bsearch3.0ms (0%)

Memory
2.6MiB live, 2.6MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
9.532287706021186e-37
1.107366768877641e-30
1.0ms
-26999.10973319384
-0.3196167228089592
Compiler

Compiled 837 to 834 computations (0.4% saved)

bsearch3.0ms (0%)

Memory
2.5MiB live, 2.5MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
9.532287706021186e-37
1.107366768877641e-30
1.0ms
-26999.10973319384
-0.3196167228089592
Compiler

Compiled 837 to 834 computations (0.4% saved)

bsearch171.0ms (0.7%)

Memory
-10.2MiB live, 50.4MiB allocated; 8ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
83.0ms
3.213784245510854e-16
13990205.13507029
80.0ms
-1.1260207236509201e-7
-6.99210498044261e-20
Samples
119.0ms156×1valid
29.0ms164×0valid
Compiler

Compiled 1 014 to 1 021 computations (-0.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 136.0ms
ival-sin: 59.0ms (43.3% of total)
ival-cos: 51.0ms (37.4% of total)
ival-mult!: 9.0ms (6.6% of total)
adjust: 8.0ms (5.9% of total)
ival-atan2: 7.0ms (5.1% of total)
ival-sub!: 3.0ms (2.2% of total)

bsearch4.0ms (0%)

Memory
2.0MiB live, 2.0MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
3.213784245510854e-16
13990205.13507029
1.0ms
-1.1260207236509201e-7
-6.99210498044261e-20
Compiler

Compiled 959 to 966 computations (-0.7% saved)

bsearch135.0ms (0.5%)

Memory
-4.2MiB live, 42.4MiB allocated; 3ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
128.0ms
2.900743657973096e+52
1.1665836393892647e+69
1.0ms
-1.1260207236509201e-7
-6.99210498044261e-20
Samples
119.0ms153×1valid
2.0ms0valid
Compiler

Compiled 1 137 to 1 134 computations (0.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 113.0ms
ival-sin: 46.0ms (40.6% of total)
ival-cos: 44.0ms (38.8% of total)
adjust: 8.0ms (7.1% of total)
ival-mult!: 6.0ms (5.3% of total)
ival-atan2: 5.0ms (4.4% of total)
ival-sub!: 4.0ms (3.5% of total)

bsearch102.0ms (0.4%)

Memory
-6.6MiB live, 39.9MiB allocated; 3ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
41.0ms
3.0402960310293874e-11
1.37858059471673e-8
55.0ms
-2.817706172636473e-17
-1.5907972621619486e-27
Samples
77.0ms127×1valid
9.0ms49×0valid
Compiler

Compiled 1 179 to 1 194 computations (-1.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 79.0ms
ival-sin: 31.0ms (39.1% of total)
ival-cos: 28.0ms (35.3% of total)
adjust: 7.0ms (8.8% of total)
ival-mult!: 6.0ms (7.6% of total)
ival-atan2: 6.0ms (7.6% of total)
ival-sub!: 2.0ms (2.5% of total)

bsearch99.0ms (0.4%)

Memory
-12.1MiB live, 34.2MiB allocated; 3ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
94.0ms
-4.272172547230584e-32
-3.707219299659291e-43
Samples
76.0ms94×1valid
11.0ms66×0valid
Compiler

Compiled 527 to 534 computations (-1.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 81.0ms
ival-sin: 33.0ms (41% of total)
ival-cos: 33.0ms (41% of total)
adjust: 5.0ms (6.2% of total)
ival-mult!: 5.0ms (6.2% of total)
ival-atan2: 4.0ms (5% of total)
ival-sub!: 1.0ms (1.2% of total)

bsearch147.0ms (0.6%)

Memory
-3.6MiB live, 45.3MiB allocated; 7ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
67.0ms
0.00016064616713569934
0.14562571838196126
73.0ms
-6.797729657359604e-75
-6.4129403233839465e-80
Samples
110.0ms185×1valid
11.0ms87×0valid
Compiler

Compiled 1 030 to 959 computations (6.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 111.0ms
ival-sin: 43.0ms (38.6% of total)
ival-cos: 42.0ms (37.7% of total)
adjust: 9.0ms (8.1% of total)
ival-mult!: 9.0ms (8.1% of total)
ival-atan2: 6.0ms (5.4% of total)
ival-sub!: 3.0ms (2.7% of total)

bsearch187.0ms (0.7%)

Memory
2.5MiB live, 48.2MiB allocated; 4ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
98.0ms
1499.613900908917
7635450961568.426
82.0ms
-63700172.72681665
-0.730093799360486
Samples
151.0ms227×1valid
14.0ms77×0valid
Compiler

Compiled 1 107 to 1 010 computations (8.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 151.0ms
ival-sin: 61.0ms (40.4% of total)
ival-cos: 59.0ms (39.1% of total)
adjust: 11.0ms (7.3% of total)
ival-mult!: 10.0ms (6.6% of total)
ival-atan2: 7.0ms (4.6% of total)
ival-sub!: 3.0ms (2% of total)

bsearch156.0ms (0.6%)

Memory
5.3MiB live, 51.3MiB allocated; 3ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
63.0ms
0.14562571838196126
4.25889441653555
86.0ms
-609973352186070.1
-63700172.72681665
Samples
121.0ms189×1valid
10.0ms67×0valid
Compiler

Compiled 849 to 844 computations (0.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 121.0ms
ival-sin: 48.0ms (39.6% of total)
ival-cos: 47.0ms (38.8% of total)
adjust: 9.0ms (7.4% of total)
ival-mult!: 9.0ms (7.4% of total)
ival-atan2: 6.0ms (5% of total)
ival-sub!: 3.0ms (2.5% of total)

bsearch3.0ms (0%)

Memory
2.1MiB live, 2.1MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
0.14562571838196126
4.25889441653555
1.0ms
-63700172.72681665
-0.730093799360486
Compiler

Compiled 795 to 808 computations (-1.6% saved)

bsearch76.0ms (0.3%)

Memory
26.9MiB live, 26.9MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
71.0ms
4.25889441653555
1499.613900908917
1.0ms
-63700172.72681665
-0.730093799360486
Samples
56.0ms82×1valid
9.0ms46×0valid
Compiler

Compiled 928 to 942 computations (-1.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 60.0ms
ival-sin: 25.0ms (41.5% of total)
ival-cos: 24.0ms (39.8% of total)
adjust: 4.0ms (6.6% of total)
ival-mult!: 4.0ms (6.6% of total)
ival-atan2: 3.0ms (5% of total)
ival-sub!: 1.0ms (1.7% of total)

bsearch29.0ms (0.1%)

Memory
6.7MiB live, 6.7MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
3.0402960310293874e-11
1.37858059471673e-8
26.0ms
-5.0330380537746365e-17
-2.817706172636473e-17
Samples
19.0ms34×1valid
4.0ms30×0valid
Compiler

Compiled 579 to 588 computations (-1.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 21.0ms
ival-sin: 8.0ms (37.9% of total)
ival-cos: 8.0ms (37.9% of total)
adjust: 2.0ms (9.5% of total)
ival-mult!: 2.0ms (9.5% of total)
ival-sub!: 1.0ms (4.7% of total)
ival-atan2: 1.0ms (4.7% of total)

bsearch12.0ms (0%)

Memory
-45.4MiB live, 1.2MiB allocated; 3ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
3.0402960310293874e-11
1.37858059471673e-8
10.0ms
-5.0330380537746365e-17
-2.817706172636473e-17
Compiler

Compiled 651 to 660 computations (-1.4% saved)

bsearch78.0ms (0.3%)

Memory
22.0MiB live, 22.0MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
74.0ms
-15069594294865846000.0
-609973352186070.1
Samples
61.0ms89×1valid
7.0ms39×0valid
Compiler

Compiled 451 to 448 computations (0.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 64.0ms
ival-sin: 26.0ms (40.9% of total)
ival-cos: 25.0ms (39.4% of total)
adjust: 5.0ms (7.9% of total)
ival-mult!: 4.0ms (6.3% of total)
ival-atan2: 3.0ms (4.7% of total)
ival-sub!: 1.0ms (1.6% of total)

bsearch82.0ms (0.3%)

Memory
-23.5MiB live, 27.4MiB allocated; 5ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
79.0ms
7525166118782924.0
8.094978432118402e+19
Samples
63.0ms94×1valid
6.0ms34×0valid
Compiler

Compiled 555 to 536 computations (3.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 64.0ms
ival-cos: 26.0ms (40.4% of total)
ival-sin: 26.0ms (40.4% of total)
adjust: 5.0ms (7.8% of total)
ival-mult!: 4.0ms (6.2% of total)
ival-atan2: 3.0ms (4.7% of total)
ival-sub!: 1.0ms (1.6% of total)

bsearch69.0ms (0.3%)

Memory
17.9MiB live, 17.9MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
66.0ms
7635450961568.426
7525166118782924.0
Samples
51.0ms78×1valid
9.0ms50×0valid
Compiler

Compiled 587 to 560 computations (4.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 55.0ms
ival-sin: 22.0ms (40.1% of total)
ival-cos: 21.0ms (38.3% of total)
adjust: 4.0ms (7.3% of total)
ival-mult!: 4.0ms (7.3% of total)
ival-atan2: 2.0ms (3.6% of total)
ival-sub!: 1.0ms (1.8% of total)

derivations13.0ms (0%)

Memory
14.9MiB live, 14.9MiB allocated; 0ms collecting garbage
Stop Event
fuel
Compiler

Compiled 734 to 345 computations (53% saved)

preprocess385.0ms (1.5%)

Memory
8.5MiB live, 434.9MiB allocated; 36ms collecting garbage
Compiler

Compiled 753 to 362 computations (51.9% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated; 0ms collecting garbage

Profiling

Loading profile data...