Spherical law of cosines

Time bar (total: 16.5s)

start0.0ms (0%)

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

analyze1.1s (6.4%)

Memory
0.6MiB live, 2 042.8MiB allocated; 536ms 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
0%0%99.8%0.2%0%0%0%9
0%0%99.8%0.2%0%0%0%10
1.6%1.6%98.2%0.2%0%0%0%11
1.6%1.6%98.2%0.2%0%0%0%12
Compiler

Compiled 21 to 19 computations (9.5% saved)

sample4.5s (27%)

Memory
144.0MiB live, 6 560.3MiB allocated; 1.0s collecting garbage
Samples
3.3s6 355×1valid
392.0ms1 777×0valid
48.0ms99×2valid
41.0ms25×3valid
Precisions
Click to see histograms. Total time spent on operations: 3.4s
ival-cos: 1.4s (40.4% of total)
ival-sin: 940.0ms (27.7% of total)
adjust: 359.0ms (10.6% of total)
ival-mult!: 353.0ms (10.4% of total)
ival-acos: 271.0ms (8% of total)
ival-sub!: 52.0ms (1.5% of total)
ival-add!: 47.0ms (1.4% of total)
Bogosity

preprocess69.0ms (0.4%)

Memory
3.3MiB live, 54.8MiB allocated; 6ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0130412
1572404
26628404
Stop Event
node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
70.8%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
Symmetry

(negabs R)

(sort lambda1 lambda2)

(sort phi1 phi2)

Compiler

Compiled 34 to 34 computations (0% saved)

series54.0ms (0.3%)

Memory
11.0MiB live, 101.8MiB allocated; 6ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
04212449
Stop Event
iter-limit
Counts
17 → 98
Calls
Call 1
Inputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
R
Outputs
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx R R)
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))))) (*.f64 (cos.f64 phi1) (*.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 (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (- lambda1 lambda2) (-.f64 lambda1 lambda2))
#s(approx lambda1 lambda1)
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#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 (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.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 (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos 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 phi1) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos 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 phi1) (cos.f64 phi2))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
#s(approx (* (* (cos 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 phi1) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
#s(approx (* (* (cos 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 phi1) (cos.f64 phi2))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
#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 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx lambda2 lambda2)
#s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.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 (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 (sin.f64 phi2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (sin.f64 phi2)))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 phi2))))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi2) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 phi2))))))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.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)) (sin.f64 phi2)) (*.f64 #s(literal 1/120 binary64) (sin.f64 phi2)))))))))
#s(approx (sin phi1) phi1)
#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) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1/2 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 (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2))
#s(approx (* (cos phi1) (cos phi2)) (+.f64 (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 phi2)))))
#s(approx (* (cos phi1) (cos phi2)) (+.f64 (cos.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 phi2)))))))
#s(approx (* (cos phi1) (cos phi2)) (+.f64 (cos.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.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)) (cos.f64 phi2)) (*.f64 #s(literal 1/24 binary64) (cos.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 (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
#s(approx (sin phi1) (sin.f64 phi1))
#s(approx (* (cos phi1) (cos phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
#s(approx (cos phi1) (cos.f64 phi1))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 (sin.f64 phi1)))))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1)))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1))))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1))))))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.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 phi1)) (*.f64 #s(literal 1/120 binary64) (sin.f64 phi1)))))))))
#s(approx (sin phi2) phi2)
#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 (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (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)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))))
#s(approx (* (cos phi1) (cos phi2)) (+.f64 (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 phi1)))))
#s(approx (* (cos phi1) (cos phi2)) (+.f64 (cos.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 phi1)))))))
#s(approx (* (cos phi1) (cos phi2)) (+.f64 (cos.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.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)) (cos.f64 phi1)) (*.f64 #s(literal 1/24 binary64) (cos.f64 phi1))))))))
#s(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 (sin phi2) (sin.f64 phi2))
Calls

15 calls:

TimeVariablePointExpression
4.0ms
phi2
@0
((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (cos phi1) (cos phi2)) (cos phi1) (cos phi2) (cos (- lambda1 lambda2)) (- lambda1 lambda2) lambda1 lambda2 R)
3.0ms
lambda1
@inf
((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (cos phi1) (cos phi2)) (cos phi1) (cos phi2) (cos (- lambda1 lambda2)) (- lambda1 lambda2) lambda1 lambda2 R)
3.0ms
phi1
@0
((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (cos phi1) (cos phi2)) (cos phi1) (cos phi2) (cos (- lambda1 lambda2)) (- lambda1 lambda2) lambda1 lambda2 R)
3.0ms
phi1
@-inf
((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (cos phi1) (cos phi2)) (cos phi1) (cos phi2) (cos (- lambda1 lambda2)) (- lambda1 lambda2) lambda1 lambda2 R)
3.0ms
phi1
@inf
((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (cos phi1) (cos phi2)) (cos phi1) (cos phi2) (cos (- lambda1 lambda2)) (- lambda1 lambda2) lambda1 lambda2 R)

rewrite223.0ms (1.4%)

Memory
-14.3MiB live, 238.9MiB allocated; 35ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01792
02992
111592
278992
0826789
11773389
Stop Event
saturated
node-limit
iter-limit
Counts
17 → 315
Calls
Call 1
Inputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
R
Outputs
(*.f64 R (acos.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(*.f64 (acos.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(neg.f64 (-.f64 (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(acos.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal -2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal -2 binary64))
(/.f64 (fma.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) #s(literal -2 binary64) (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -2 binary64) (*.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) #s(literal -2 binary64))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -2 binary64))) #s(literal -4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal -2 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(neg.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (neg.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (neg.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2)))
(-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (neg.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (neg.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(*.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(/.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 2 binary64)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (neg.f64 (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal -2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 1/2 binary64))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(/.f64 (fma.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) #s(literal 2 binary64) (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64) (*.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (fma.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi2 phi1)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 phi1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi2) (fabs.f64 phi1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 phi2) (neg.f64 phi1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (fabs.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 phi2) (fabs.f64 phi1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) phi1)) (cos.f64 (-.f64 (fabs.f64 phi2) phi1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 phi1))) (cos.f64 (-.f64 phi2 (neg.f64 phi1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 (fabs.f64 phi1))) (cos.f64 (-.f64 phi2 (fabs.f64 phi1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 phi2))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 phi2))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 phi2))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi2)) (cos.f64 (-.f64 (neg.f64 phi1) phi2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 phi2))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 phi1) (fabs.f64 phi2))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) phi2)) (cos.f64 (-.f64 (fabs.f64 phi1) phi2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 phi2))) (cos.f64 (-.f64 phi1 (fabs.f64 phi2))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) phi1)) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) phi1)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 phi2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 phi2) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 phi2 (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 phi2 (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) phi2)) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) phi2)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 phi1 (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 phi1 (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1)) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi2))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi2))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))) #s(literal -2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi2) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (fabs.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 phi2) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) phi1)) (cos.f64 (-.f64 (fabs.f64 phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 phi1))) (cos.f64 (-.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (fabs.f64 phi1))) (cos.f64 (-.f64 phi2 (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 phi2))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi2)) (cos.f64 (-.f64 (neg.f64 phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 phi1) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) phi2)) (cos.f64 (-.f64 (fabs.f64 phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 phi2))) (cos.f64 (-.f64 phi1 (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (neg.f64 (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 phi1))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 phi1))) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 (neg.f64 phi2) (fabs.f64 phi1))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (neg.f64 phi2) (fabs.f64 phi1))) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 (neg.f64 phi2) phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (neg.f64 phi1))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (fabs.f64 phi2) (neg.f64 phi1))) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (fabs.f64 phi1))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (fabs.f64 phi2) (fabs.f64 phi1))) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 (fabs.f64 phi2) phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (fabs.f64 phi2) phi1)) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 phi2 (neg.f64 phi1))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 (neg.f64 phi1))) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 phi2 (fabs.f64 phi1))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 (fabs.f64 phi1))) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 phi2))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 phi2))) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 phi2))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 phi2))) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (neg.f64 phi1) phi2)) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 phi2))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 phi2))) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 phi2))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (fabs.f64 phi1) (fabs.f64 phi2))) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 (fabs.f64 phi1) phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (fabs.f64 phi1) phi2)) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 phi1 (fabs.f64 phi2))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi1 (fabs.f64 phi2))) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))
(sin.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))
(fma.f64 (sin.f64 (fabs.f64 phi1)) #s(literal 0 binary64) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(fma.f64 (neg.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 #s(literal 0 binary64) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) #s(literal 0 binary64) (*.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 1/2 binary64))))))
(cos.f64 (neg.f64 (neg.f64 (neg.f64 phi1))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 phi1))))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(cos.f64 (neg.f64 (fabs.f64 phi1)))
(cos.f64 (neg.f64 phi1))
(cos.f64 (fabs.f64 phi1))
(cos.f64 phi1)
(+.f64 (*.f64 (neg.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 #s(literal 1 binary64) (cos.f64 phi1)) (*.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(+.f64 (*.f64 (sin.f64 phi1) #s(literal 0 binary64)) (*.f64 (cos.f64 phi1) #s(literal 1 binary64)))
(sin.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))
(fma.f64 (sin.f64 (fabs.f64 phi2)) #s(literal 0 binary64) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(fma.f64 (neg.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 #s(literal 0 binary64) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi2) #s(literal 0 binary64) (*.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 1/2 binary64))))))
(cos.f64 (neg.f64 (neg.f64 (neg.f64 phi2))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 phi2))))
(cos.f64 (neg.f64 (neg.f64 phi2)))
(cos.f64 (neg.f64 (fabs.f64 phi2)))
(cos.f64 (neg.f64 phi2))
(cos.f64 (fabs.f64 phi2))
(cos.f64 phi2)
(+.f64 (*.f64 (neg.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 #s(literal 1 binary64) (cos.f64 phi2)) (*.f64 #s(literal 0 binary64) (sin.f64 phi2)))
(+.f64 (*.f64 (sin.f64 phi2) #s(literal 0 binary64)) (*.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(/.f64 (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #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 lambda2) (cos.f64 lambda1)) #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 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) #s(literal 4 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))) #s(literal 4 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 (+.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 (-.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))))) #s(literal 4 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))))) #s(literal 4 binary64))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) #s(literal 0 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (fabs.f64 (-.f64 lambda2 lambda1))) #s(literal 0 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (cos.f64 (+.f64 (neg.f64 lambda2) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 (neg.f64 lambda2)))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 (neg.f64 lambda2)))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (-.f64 lambda2 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 lambda1) (sin.f64 (-.f64 lambda2 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 (neg.f64 (neg.f64 lambda2)))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (neg.f64 (sin.f64 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1)))))
(cos.f64 (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (fabs.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (fabs.f64 (-.f64 lambda2 lambda1))) #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (+.f64 (neg.f64 lambda2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 (neg.f64 lambda2)))))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(neg.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda1 (neg.f64 (neg.f64 lambda2)))
(-.f64 lambda1 lambda2)
(+.f64 (neg.f64 lambda2) lambda1)
(+.f64 lambda1 (neg.f64 lambda2))
lambda1
lambda2
R

eval91.0ms (0.6%)

Memory
-7.0MiB live, 89.8MiB allocated; 16ms collecting garbage
Compiler

Compiled 6 085 to 2 814 computations (53.8% saved)

prune40.0ms (0.2%)

Memory
42.9MiB live, 89.9MiB allocated; 2ms collecting garbage
Pruning

39 alts after pruning (39 fresh and 0 done)

PrunedKeptTotal
New36139400
Fresh000
Picked101
Done000
Total36239401
Accuracy
92.7%
Counts
401 → 39
Alt Table
Click to see full alt table
StatusAccuracyProgram
70.7%
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
70.5%
(*.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
57.3%
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
70.8%
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
57.4%
(*.f64 (acos.f64 (/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) R)
92.5%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
31.4%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
31.9%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
31.6%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
57.5%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
43.1%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
42.6%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
46.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
46.8%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
92.5%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
72.2%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda1) (cos.f64 (+.f64 (neg.f64 lambda2) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
92.5%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
35.1%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) R)
35.8%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
59.1%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
54.9%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))))))) R)
45.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))))))) R)
46.9%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))))))) R)
38.5%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))))))) R)
40.5%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))) R)
47.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
35.5%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))) R)
31.9%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.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))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
40.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
44.4%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
33.0%
(*.f64 (acos.f64 (+.f64 (*.f64 #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)))))) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
42.5%
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
54.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
47.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
37.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
31.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
34.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
41.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
43.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
Compiler

Compiled 1 826 to 1 766 computations (3.3% saved)

series205.0ms (1.2%)

Memory
-3.8MiB live, 323.0MiB allocated; 43ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0147913226
Stop Event
iter-limit
Counts
54 → 344
Calls
Call 1
Inputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(sin.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(cos.f64 lambda2)
(cos.f64 lambda1)
R
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(-.f64 lambda2 lambda1)
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(PI.f64)
#s(literal 1/2 binary64)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64))
(+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)))
(sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))
(-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)
(+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(neg.f64 phi1)
(sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))
(+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)
#s(literal 2 binary64)
Outputs
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx R R)
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) R) (*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) R) (*.f64 R (acos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos.f64 lambda2))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2)))))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (+.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) 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 (* (cos lambda2) (cos lambda1)) (+.f64 (cos.f64 lambda2) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 lambda2)))))
#s(approx (* (cos lambda2) (cos lambda1)) (+.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 lambda2) (cos lambda1)) (+.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 (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 (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (sin.f64 (neg.f64 lambda2))) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (sin.f64 (neg.f64 lambda2))) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (sin.f64 (neg.f64 lambda2)))))))) (*.f64 (cos.f64 phi1) (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 (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (- lambda1 lambda2) (-.f64 lambda1 lambda2))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.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 phi1) (cos.f64 phi2))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 #s(literal -1 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (sin (+ (- lambda2 lambda1) (* (PI) 1/2))) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ (- lambda2 lambda1) (* (PI) 1/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) 1/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) 1/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) 1/2)) (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (- lambda2 lambda1) (* (PI) 1/2)) (+.f64 lambda2 (fma.f64 #s(literal -1 binary64) lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (- lambda2 lambda1) lambda2)
#s(approx (- lambda2 lambda1) (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) (acos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 #s(literal -1/4 binary64) (*.f64 lambda1 (*.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 lambda1 (fma.f64 #s(literal -1/4 binary64) (*.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 #s(literal 1/12 binary64) (*.f64 lambda1 (*.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 #s(literal -1/4 binary64) (*.f64 lambda1 (*.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))))))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 lambda1 (fma.f64 #s(literal -1/4 binary64) (*.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 #s(literal 1/12 binary64) (*.f64 lambda1 (*.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
#s(approx (sin lambda1) (sin.f64 lambda1))
#s(approx (* (cos lambda2) (cos lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
#s(approx (cos lambda1) (cos.f64 lambda1))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
#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 (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))
#s(approx (sin (+ (- lambda2 lambda1) (* (PI) 1/2))) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))
#s(approx (+ (- lambda2 lambda1) (* (PI) 1/2)) (*.f64 #s(literal -1 binary64) lambda1))
#s(approx (+ (- lambda2 lambda1) (* (PI) 1/2)) (*.f64 lambda1 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) lambda1) (/.f64 lambda2 lambda1)) #s(literal 1 binary64))))
#s(approx (- lambda2 lambda1) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi1) (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 (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) R) (*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 (fma.f64 #s(literal -1 binary64) lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 (fma.f64 #s(literal -1 binary64) lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 (fma.f64 #s(literal -1 binary64) lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (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) 1/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) 1/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 (- lambda2 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) R) (*.f64 R (acos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) (acos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)))))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (+.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) (*.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 lambda2) (cos lambda1)) (+.f64 (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 lambda1)))))
#s(approx (* (cos lambda2) (cos lambda1)) (+.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 lambda2) (cos lambda1)) (+.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 (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 (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (*.f64 (cos.f64 phi1) (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (sin.f64 lambda1))))) (*.f64 (cos.f64 phi1) (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (cos.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 phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))))))
#s(approx (sin (+ (- lambda2 lambda1) (* (PI) 1/2))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)))
#s(approx (sin (+ (- lambda2 lambda1) (* (PI) 1/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) 1/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) 1/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) 1/2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))
#s(approx (+ (- lambda2 lambda1) (* (PI) 1/2)) (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))
#s(approx (- lambda2 lambda1) (-.f64 lambda2 lambda1))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (*.f64 (sin.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (fma.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (fma.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 #s(literal -1/12 binary64) (*.f64 lambda2 (*.f64 (sin.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (*.f64 (sin.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))))))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 #s(literal -1/12 binary64) (*.f64 lambda2 (*.f64 (sin.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))))))))))
#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) 1/2)) (*.f64 lambda2 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) lambda2))) (/.f64 lambda1 lambda2))))
#s(approx (- lambda2 lambda1) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2)))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi1) (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 (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) R) (*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (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) 1/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) 1/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 (- lambda2 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) R) (*.f64 R (acos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) (acos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.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 (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1/2 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) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 phi1 (fma.f64 #s(literal -1/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/6 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 (* (sin phi1) (sin phi2)) (*.f64 phi1 (sin.f64 phi2)))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 phi2))))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi2) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 phi2))))))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.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)) (sin.f64 phi2)) (*.f64 #s(literal 1/120 binary64) (sin.f64 phi2)))))))))
#s(approx (sin phi1) phi1)
#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) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 #s(literal -1/2 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 (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (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/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/24 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 (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (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/2 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/720 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/24 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))))
#s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2))
#s(approx (* (cos phi1) (cos phi2)) (+.f64 (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 phi2)))))
#s(approx (* (cos phi1) (cos phi2)) (+.f64 (cos.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 phi2)))))))
#s(approx (* (cos phi1) (cos phi2)) (+.f64 (cos.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.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)) (cos.f64 phi2)) (*.f64 #s(literal 1/24 binary64) (cos.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 (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 (sin.f64 phi2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi1 #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 phi1 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 (sin.f64 phi2)))))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.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 (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1/2 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) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))) (*.f64 #s(literal -1/6 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) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (fma.f64 #s(literal -1/2 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 (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (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/2 binary64) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))) (*.f64 #s(literal 1/24 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 (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (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/2 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/720 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/24 binary64) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (*.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (*.f64 phi1 (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi2) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/6 binary64) (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/6 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))))))))))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))) (*.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))))))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))) (*.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (*.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/6 binary64) (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/6 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))))))))))
#s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))
#s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))))
#s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))))))
#s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))) (*.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (*.f64 phi1 (fma.f64 #s(literal 1/6 binary64) (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/6 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))))))))
#s(approx (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))
#s(approx (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))))))
#s(approx (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))))))))
#s(approx (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)) (*.f64 phi1 (fma.f64 #s(literal 1/6 binary64) (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/6 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))))))))))))
#s(approx (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))
#s(approx (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))))
#s(approx (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))))))
#s(approx (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)) (*.f64 #s(literal 1/6 binary64) (*.f64 phi1 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))))))))
#s(approx (- (+ (neg phi1) (* (PI) 1/2)) phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))
#s(approx (- (+ (neg phi1) (* (PI) 1/2)) phi2) (-.f64 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi2))
#s(approx (+ (neg phi1) (* (PI) 1/2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (+ (neg phi1) (* (PI) 1/2)) (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 (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2)) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2)) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2)) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 phi1 (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (+ (+ (neg phi1) (* (PI) 1/2)) phi2) (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (+ (neg phi1) (* (PI) 1/2)) phi2) (+.f64 phi2 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
#s(approx (sin phi1) (sin.f64 phi1))
#s(approx (* (cos phi1) (cos phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
#s(approx (cos phi1) (cos.f64 phi1))
#s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))))
#s(approx (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))
#s(approx (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))))
#s(approx (- (+ (neg phi1) (* (PI) 1/2)) phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi1)) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
#s(approx (+ (neg phi1) (* (PI) 1/2)) (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi1)) #s(literal 1 binary64))))
#s(approx (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))
#s(approx (+ (+ (neg phi1) (* (PI) 1/2)) phi2) (*.f64 phi1 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi1) (/.f64 phi2 phi1)) #s(literal 1 binary64))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) R) (*.f64 R (acos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (+.f64 phi2 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) (acos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (+.f64 phi2 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (+.f64 phi2 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (+.f64 phi2 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi2))))))
#s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 phi2 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi2)))))
#s(approx (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) (+.f64 (sin.f64 (+.f64 phi2 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi2))))
#s(approx (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi2)))
#s(approx (- (+ (neg phi1) (* (PI) 1/2)) phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2) phi1))))))
#s(approx (+ (neg phi1) (* (PI) 1/2)) (*.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 (+ (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin.f64 (+.f64 phi2 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (+ (neg phi1) (* (PI) 1/2)) phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 (sin.f64 phi1)))))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1)))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1))))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1))))))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.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 phi1)) (*.f64 #s(literal 1/120 binary64) (sin.f64 phi1)))))))))
#s(approx (sin phi2) phi2)
#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 (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 (cos.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 (cos.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 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))))
#s(approx (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 (cos.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 (cos.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 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))))
#s(approx (* (cos phi1) (cos phi2)) (+.f64 (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 phi1)))))
#s(approx (* (cos phi1) (cos phi2)) (+.f64 (cos.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 phi1)))))))
#s(approx (* (cos phi1) (cos phi2)) (+.f64 (cos.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.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)) (cos.f64 phi1)) (*.f64 #s(literal 1/24 binary64) (cos.f64 phi1))))))))
#s(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 (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 (sin.f64 phi1)))))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 (sin.f64 phi1)))))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))) (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 (sin.f64 phi1)))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (fma.f64 (cos.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 (cos.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 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))))))
#s(approx (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (fma.f64 (cos.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 (cos.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 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (*.f64 phi2 (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal 1/6 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))))))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (fma.f64 phi2 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal 1/6 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))
#s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))
#s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (+.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 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))))))
#s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 phi2 (fma.f64 #s(literal -1/2 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 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))))))
#s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 phi2 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (fma.f64 #s(literal -1/6 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal 1/6 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))))))))))
#s(approx (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) (*.f64 #s(literal 2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))
#s(approx (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) (fma.f64 #s(literal 2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 phi2 (+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))))
#s(approx (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) (fma.f64 #s(literal 2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 phi2 (+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (fma.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal -1 binary64) (*.f64 phi2 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))))))
#s(approx (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) (fma.f64 #s(literal 2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 phi2 (+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (fma.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 phi2 (fma.f64 #s(literal -1 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 phi2 (fma.f64 #s(literal -1/6 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal 1/6 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))))))))))
#s(approx (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal -1 binary64) (*.f64 phi2 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))))
#s(approx (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 phi2 (fma.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))))))
#s(approx (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 phi2 (fma.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal 1/6 binary64) (*.f64 phi2 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))))))))
#s(approx (- (+ (neg phi1) (* (PI) 1/2)) phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))
#s(approx (- (+ (neg phi1) (* (PI) 1/2)) phi2) (-.f64 (fma.f64 #s(literal -1 binary64) phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))
#s(approx (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 phi2 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))
#s(approx (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 phi2 (+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))))))
#s(approx (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 phi2 (+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))))))))
#s(approx (+ (+ (neg phi1) (* (PI) 1/2)) phi2) (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))
#s(approx (sin phi2) (sin.f64 phi2))
#s(approx (- (+ (neg phi1) (* (PI) 1/2)) phi2) (*.f64 #s(literal -1 binary64) phi2))
#s(approx (- (+ (neg phi1) (* (PI) 1/2)) phi2) (*.f64 phi2 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi2)) (+.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))))
#s(approx (+ (+ (neg phi1) (* (PI) 1/2)) phi2) (*.f64 phi2 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi2))) (/.f64 phi1 phi2))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) R) (*.f64 R (acos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 (*.f64 #s(literal -1 binary64) phi2)))) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) (acos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 (*.f64 #s(literal -1 binary64) phi2)))) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 (*.f64 #s(literal -1 binary64) phi2)))) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 (*.f64 #s(literal -1 binary64) phi2)))) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))))
#s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 (*.f64 #s(literal -1 binary64) phi2)))) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))))
#s(approx (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 (*.f64 #s(literal -1 binary64) phi2)))) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))
#s(approx (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))
#s(approx (- (+ (neg phi1) (* (PI) 1/2)) phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))))))
#s(approx (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 (*.f64 #s(literal -1 binary64) phi2)))))
#s(approx (+ (+ (neg phi1) (* (PI) 1/2)) phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi2 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1 binary64)))))
Calls

15 calls:

TimeVariablePointExpression
26.0ms
phi2
@inf
((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (* (cos phi1) (cos phi2)) (cos phi1) (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (sin lambda2) lambda2 (sin lambda1) lambda1 (* (cos lambda2) (cos lambda1)) (cos lambda2) (cos lambda1) R (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))) (+ (- lambda2 lambda1) (* (PI) 1/2)) (- lambda2 lambda1) (* (PI) 1/2) (PI) 1/2 (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (- (+ (neg phi1) (* (PI) 1/2)) phi2) (+ (neg phi1) (* (PI) 1/2)) (neg phi1) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2)) (+ (+ (neg phi1) (* (PI) 1/2)) phi2) 2)
18.0ms
lambda1
@inf
((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (* (cos phi1) (cos phi2)) (cos phi1) (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (sin lambda2) lambda2 (sin lambda1) lambda1 (* (cos lambda2) (cos lambda1)) (cos lambda2) (cos lambda1) R (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))) (+ (- lambda2 lambda1) (* (PI) 1/2)) (- lambda2 lambda1) (* (PI) 1/2) (PI) 1/2 (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (- (+ (neg phi1) (* (PI) 1/2)) phi2) (+ (neg phi1) (* (PI) 1/2)) (neg phi1) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2)) (+ (+ (neg phi1) (* (PI) 1/2)) phi2) 2)
13.0ms
phi1
@-inf
((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (* (cos phi1) (cos phi2)) (cos phi1) (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (sin lambda2) lambda2 (sin lambda1) lambda1 (* (cos lambda2) (cos lambda1)) (cos lambda2) (cos lambda1) R (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))) (+ (- lambda2 lambda1) (* (PI) 1/2)) (- lambda2 lambda1) (* (PI) 1/2) (PI) 1/2 (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (- (+ (neg phi1) (* (PI) 1/2)) phi2) (+ (neg phi1) (* (PI) 1/2)) (neg phi1) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2)) (+ (+ (neg phi1) (* (PI) 1/2)) phi2) 2)
10.0ms
lambda2
@inf
((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (* (cos phi1) (cos phi2)) (cos phi1) (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (sin lambda2) lambda2 (sin lambda1) lambda1 (* (cos lambda2) (cos lambda1)) (cos lambda2) (cos lambda1) R (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))) (+ (- lambda2 lambda1) (* (PI) 1/2)) (- lambda2 lambda1) (* (PI) 1/2) (PI) 1/2 (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (- (+ (neg phi1) (* (PI) 1/2)) phi2) (+ (neg phi1) (* (PI) 1/2)) (neg phi1) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2)) (+ (+ (neg phi1) (* (PI) 1/2)) phi2) 2)
9.0ms
lambda1
@-inf
((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (* (cos phi1) (cos phi2)) (cos phi1) (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (sin lambda2) lambda2 (sin lambda1) lambda1 (* (cos lambda2) (cos lambda1)) (cos lambda2) (cos lambda1) R (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))) (+ (- lambda2 lambda1) (* (PI) 1/2)) (- lambda2 lambda1) (* (PI) 1/2) (PI) 1/2 (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (- (+ (neg phi1) (* (PI) 1/2)) phi2) (+ (neg phi1) (* (PI) 1/2)) (neg phi1) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2)) (+ (+ (neg phi1) (* (PI) 1/2)) phi2) 2)

rewrite390.0ms (2.4%)

Memory
-32.6MiB live, 366.2MiB allocated; 198ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
064639
0109509
1493502
23240502
08439486
123026486
Stop Event
saturated
node-limit
iter-limit
Counts
54 → 1 305
Calls
Call 1
Inputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(sin.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(cos.f64 lambda2)
(cos.f64 lambda1)
R
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(-.f64 lambda2 lambda1)
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(PI.f64)
#s(literal 1/2 binary64)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64))
(+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)))
(sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))
(-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)
(+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(neg.f64 phi1)
(sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))
(+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)
#s(literal 2 binary64)
Outputs
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(neg.f64 (-.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (asin.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1)) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(neg.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (neg.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (neg.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (neg.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(*.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))))
(*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (-.f64 (neg.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)))) #s(literal -2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (neg.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal -2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (*.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1)))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (*.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(*.f64 (-.f64 (neg.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal -1/2 binary64))
(*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2) phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 phi2 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2) phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 phi2 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) phi1)) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) phi1)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi2)) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi2)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi2)) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi2)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi2)) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi2)) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi2)) (fabs.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi2)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi2)) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi2)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi2)) phi1)) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi2)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 phi2) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 phi2) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 phi2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 phi2) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 phi2 (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 phi2 (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 phi2 (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) phi2)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) phi2)) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (fabs.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (fabs.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) phi2)) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 phi1) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 phi1 (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 phi1 (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 phi1 (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi2))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi2)) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (neg.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fabs.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (neg.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (fabs.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)) #s(literal 2 binary64) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 2 binary64))
(/.f64 (fma.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 2 binary64) (*.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (fma.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi2) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) phi1)) (cos.f64 (-.f64 (neg.f64 phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (fabs.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 phi2) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) phi1)) (cos.f64 (-.f64 (fabs.f64 phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (fabs.f64 phi1))) (cos.f64 (-.f64 phi2 (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 phi1))) (cos.f64 (-.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 phi1) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) phi2)) (cos.f64 (-.f64 (fabs.f64 phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 phi2))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi2)) (cos.f64 (-.f64 (neg.f64 phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 phi2))) (cos.f64 (-.f64 phi1 (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (fabs.f64 phi2))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (fabs.f64 phi1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (neg.f64 phi1))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (neg.f64 phi2))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fabs.f64 phi2))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) phi2)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) phi2))) #s(literal 2 binary64))
(/.f64 (-.f64 (neg.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal -2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 2 binary64))
(neg.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)))
(-.f64 (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)) (/.f64 (neg.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))
(+.f64 (*.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)))
(sin.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))
(sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))
(fma.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))))
(fma.f64 (sin.f64 phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(cos.f64 (neg.f64 (fabs.f64 phi1)))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(cos.f64 (fabs.f64 (fabs.f64 phi1)))
(cos.f64 (fabs.f64 phi1))
(cos.f64 (neg.f64 phi1))
(cos.f64 phi1)
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1))))
(sin.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))
(fma.f64 (sin.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(cos.f64 (neg.f64 (neg.f64 phi2)))
(cos.f64 (neg.f64 (fabs.f64 phi2)))
(cos.f64 (fabs.f64 (fabs.f64 phi2)))
(cos.f64 (neg.f64 phi2))
(cos.f64 (fabs.f64 phi2))
(cos.f64 phi2)
(+.f64 (*.f64 (sin.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(/.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 lambda1) (cos.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 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) #s(literal 4 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))) #s(literal 4 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 (+.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 (-.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))))) #s(literal 4 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))))) #s(literal 4 binary64))
(neg.f64 (-.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(sin.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (neg.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (neg.f64 (neg.f64 (*.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 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (neg.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(-.f64 (*.f64 (sin.f64 lambda2) (cos.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (neg.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1)))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.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 (sin.f64 lambda2) (sin.f64 (neg.f64 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(cos.f64 (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (fabs.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (neg.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(+.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)))
(sin.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda1)) (neg.f64 (neg.f64 lambda2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda1)) (neg.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda1)) (neg.f64 (fabs.f64 lambda2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda1)) (neg.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda1)) (fabs.f64 (fabs.f64 lambda2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda1)) (fabs.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda1)) (neg.f64 lambda2))) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda1)) (neg.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda1)) (fabs.f64 lambda2))) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda1)) (fabs.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda1)) lambda2)) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda1)) lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 lambda1)) (neg.f64 (neg.f64 lambda2)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 lambda1)) (neg.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 lambda1)) (neg.f64 (fabs.f64 lambda2)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 lambda1)) (neg.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 lambda1)) (fabs.f64 (fabs.f64 lambda2)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 lambda1)) (fabs.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 lambda1)) (neg.f64 lambda2))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 lambda1)) (neg.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 lambda1)) (fabs.f64 lambda2))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 lambda1)) (fabs.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 lambda1)) lambda2)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 lambda1)) lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 lambda1)) (neg.f64 (neg.f64 lambda2)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 lambda1)) (neg.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 lambda1)) (neg.f64 (fabs.f64 lambda2)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 lambda1)) (neg.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 lambda1)) (fabs.f64 (fabs.f64 lambda2)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 lambda1)) (fabs.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 lambda1)) (neg.f64 lambda2))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 lambda1)) (neg.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 lambda1)) (fabs.f64 lambda2))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 lambda1)) (fabs.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 lambda1)) lambda2)) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 lambda1)) lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (-.f64 (neg.f64 lambda1) (neg.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 lambda1) (neg.f64 (fabs.f64 lambda2)))) (cos.f64 (-.f64 (neg.f64 lambda1) (neg.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 lambda1) (fabs.f64 (fabs.f64 lambda2)))) (cos.f64 (-.f64 (neg.f64 lambda1) (fabs.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 lambda1) (neg.f64 (neg.f64 lambda2)))) (cos.f64 (-.f64 (fabs.f64 lambda1) (neg.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 lambda1) (neg.f64 (fabs.f64 lambda2)))) (cos.f64 (-.f64 (fabs.f64 lambda1) (neg.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 lambda1) (fabs.f64 (fabs.f64 lambda2)))) (cos.f64 (-.f64 (fabs.f64 lambda1) (fabs.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda1 (neg.f64 (neg.f64 lambda2)))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda1 (neg.f64 (fabs.f64 lambda2)))) (cos.f64 (-.f64 lambda1 (neg.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda1 (fabs.f64 (fabs.f64 lambda2)))) (cos.f64 (-.f64 lambda1 (fabs.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda2)) (neg.f64 (neg.f64 lambda1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda2)) (neg.f64 (neg.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda2)) (neg.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda2)) (neg.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda2)) (fabs.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda2)) (fabs.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda2)) (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda2)) (fabs.f64 lambda1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda2)) (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda2)) lambda1)) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda2)) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 lambda2)) (neg.f64 (neg.f64 lambda1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 lambda2)) (neg.f64 (neg.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 lambda2)) (neg.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 lambda2)) (neg.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 lambda2)) (fabs.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 lambda2)) (fabs.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 lambda2)) (neg.f64 lambda1))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 lambda2)) (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 lambda2)) (fabs.f64 lambda1))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 lambda2)) (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 lambda2)) lambda1)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 lambda2)) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 lambda2)) (neg.f64 (neg.f64 lambda1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 lambda2)) (neg.f64 (neg.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 lambda2)) (neg.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 lambda2)) (neg.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 lambda2)) (fabs.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 lambda2)) (fabs.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 lambda2)) (neg.f64 lambda1))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 lambda2)) (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 lambda2)) (fabs.f64 lambda1))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 lambda2)) (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 lambda2)) lambda1)) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 lambda2)) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (-.f64 (neg.f64 lambda2) (neg.f64 (neg.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 lambda2) (neg.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 (neg.f64 lambda2) (neg.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 lambda2) (fabs.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 (neg.f64 lambda2) (fabs.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 lambda2) (neg.f64 (neg.f64 lambda1)))) (cos.f64 (-.f64 (fabs.f64 lambda2) (neg.f64 (neg.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 lambda2) (neg.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 (fabs.f64 lambda2) (neg.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 lambda2) (fabs.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 (fabs.f64 lambda2) (fabs.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 (neg.f64 lambda1)))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 lambda2 (neg.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (fabs.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 lambda2 (fabs.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1))) (cos.f64 (+.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1))) (cos.f64 (+.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 lambda2)))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 lambda2)))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 lambda2)))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 lambda2))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 lambda2))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 lambda2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 lambda2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 lambda2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 lambda2))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 lambda2))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (neg.f64 (neg.f64 lambda2)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (neg.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (neg.f64 (fabs.f64 lambda2)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (neg.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (fabs.f64 (fabs.f64 lambda2)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (fabs.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 lambda1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 lambda1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 lambda1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 lambda1))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 lambda1))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 lambda1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 lambda1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 lambda1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 lambda1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 lambda1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (neg.f64 (neg.f64 lambda1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (neg.f64 (neg.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (neg.f64 (fabs.f64 lambda1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (neg.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (fabs.f64 (fabs.f64 lambda1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (fabs.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #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 (neg.f64 lambda1) (fabs.f64 lambda2))) (cos.f64 (-.f64 (neg.f64 lambda1) (fabs.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (-.f64 (neg.f64 lambda1) 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 (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) lambda2)) (cos.f64 (-.f64 (fabs.f64 lambda1) lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 (neg.f64 lambda2)))) #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 (+.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 (neg.f64 lambda2) (fabs.f64 lambda1))) (cos.f64 (-.f64 (neg.f64 lambda2) (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (-.f64 (neg.f64 lambda2) 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 (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) lambda1)) (cos.f64 (-.f64 (fabs.f64 lambda2) lambda1))) #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 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (neg.f64 lambda2))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (neg.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (fabs.f64 lambda2))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (fabs.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (neg.f64 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (fabs.f64 lambda1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #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)))
(sin.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))
(fma.f64 (sin.f64 lambda2) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(cos.f64 (neg.f64 (neg.f64 lambda2)))
(cos.f64 (neg.f64 (fabs.f64 lambda2)))
(cos.f64 (fabs.f64 (fabs.f64 lambda2)))
(cos.f64 (neg.f64 lambda2))
(cos.f64 (fabs.f64 lambda2))
(cos.f64 lambda2)
(+.f64 (*.f64 (sin.f64 lambda2) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1))
(fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(cos.f64 (neg.f64 (neg.f64 lambda1)))
(cos.f64 (neg.f64 (fabs.f64 lambda1)))
(cos.f64 (fabs.f64 (fabs.f64 lambda1)))
(cos.f64 (neg.f64 lambda1))
(cos.f64 (fabs.f64 lambda1))
(cos.f64 lambda1)
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
R
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) R)
(*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(neg.f64 (-.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(*.f64 (+.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))) phi1)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1))) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1))) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1))) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1))) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1))) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1))) (fabs.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1))) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1))) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1))) phi1)) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1))))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 (-.f64 lambda2 lambda1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1))))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 (-.f64 lambda2 lambda1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1))))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (fabs.f64 (-.f64 lambda2 lambda1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (fabs.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1))))) (cos.f64 (-.f64 (fabs.f64 phi1) (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1))))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))))) (cos.f64 (-.f64 phi1 (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1))))) (cos.f64 (-.f64 phi1 (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (+.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)))) (cos.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)))) (cos.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)) (sin.f64 (+.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fabs.f64 phi1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (neg.f64 phi1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1))))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (-.f64 lambda2 lambda1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1))))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1))))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (fabs.f64 (-.f64 lambda2 lambda1)))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (fabs.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))))) #s(literal -2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (fabs.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) phi1)) (cos.f64 (-.f64 (fabs.f64 (-.f64 lambda2 lambda1)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) (fabs.f64 phi1))) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) (neg.f64 phi1))) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (fabs.f64 phi1))) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) (neg.f64 phi1))) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 (-.f64 lambda2 lambda1)))) (cos.f64 (-.f64 (fabs.f64 phi1) (fabs.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 (fabs.f64 phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (fabs.f64 phi1) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 (-.f64 lambda2 lambda1)))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 (neg.f64 phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (neg.f64 phi1) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 (-.f64 lambda2 lambda1)))) (cos.f64 (-.f64 phi1 (fabs.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fabs.f64 phi1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (neg.f64 phi1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fabs.f64 (-.f64 lambda2 lambda1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fabs.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)))
(+.f64 (/.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) #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 lambda1) (cos.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 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) #s(literal 4 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))) #s(literal 4 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 (+.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 (-.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))))) #s(literal 4 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))))) #s(literal 4 binary64))
(neg.f64 (-.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(sin.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (neg.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (neg.f64 (neg.f64 (*.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 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (neg.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(-.f64 (*.f64 (sin.f64 lambda2) (cos.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (neg.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1)))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.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 (sin.f64 lambda2) (sin.f64 (neg.f64 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(cos.f64 (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (fabs.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (neg.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(+.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)))
(neg.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda1 (neg.f64 (neg.f64 lambda2)))
(-.f64 lambda1 lambda2)
(+.f64 (neg.f64 lambda2) (neg.f64 (neg.f64 lambda1)))
(+.f64 (neg.f64 lambda2) lambda1)
(+.f64 lambda1 (neg.f64 lambda2))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(neg.f64 (-.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(neg.f64 (-.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (neg.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2) (neg.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (neg.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (neg.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (neg.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (neg.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)))
(-.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (cos.f64 phi2)))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 lambda1)))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (neg.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (sin.f64 phi2)))
(+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (neg.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)))
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(neg.f64 (-.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (asin.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1)) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(neg.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (neg.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (neg.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (neg.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(*.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))))
(*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (-.f64 (neg.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)))) #s(literal -2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (neg.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal -2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (*.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1)))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (*.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(/.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 lambda1) (cos.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 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) #s(literal 4 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))) #s(literal 4 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 (+.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 (-.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))))) #s(literal 4 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))))) #s(literal 4 binary64))
(neg.f64 (-.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(sin.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (neg.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (neg.f64 (neg.f64 (*.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 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (neg.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(-.f64 (*.f64 (sin.f64 lambda2) (cos.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (neg.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1)))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.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 (sin.f64 lambda2) (sin.f64 (neg.f64 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(cos.f64 (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (fabs.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (neg.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(+.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)))
(neg.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (-.f64 lambda2 lambda1)))
(neg.f64 (-.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (-.f64 lambda2 lambda1))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (-.f64 lambda2 lambda1))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) lambda1)
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (-.f64 lambda1 lambda2))
(-.f64 (-.f64 lambda2 lambda1) (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(-.f64 lambda2 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (neg.f64 lambda1))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (-.f64 lambda2 lambda1))
(+.f64 (-.f64 lambda2 lambda1) (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))
(+.f64 (-.f64 lambda2 lambda1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(+.f64 (-.f64 lambda2 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(+.f64 lambda2 (-.f64 (neg.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(+.f64 lambda2 (neg.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 lambda2 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(neg.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda2 (neg.f64 (neg.f64 lambda1)))
(-.f64 lambda2 lambda1)
(+.f64 (neg.f64 lambda1) (neg.f64 (neg.f64 lambda2)))
(+.f64 (neg.f64 lambda1) lambda2)
(+.f64 lambda2 (neg.f64 lambda1))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(*.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(*.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(/.f64 (*.f64 (PI.f64) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 2 binary64))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/2 binary64)))
(PI.f64)
#s(literal 1/2 binary64)
(*.f64 R (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(neg.f64 (-.f64 (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (asin.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1)) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(neg.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (neg.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (neg.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (neg.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(*.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda2 lambda1))))
(*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (-.f64 (neg.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)))) #s(literal -2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (neg.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal -2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (*.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1)))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (*.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(*.f64 (-.f64 (neg.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal -1/2 binary64))
(*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2) phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 phi2 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2) phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 phi2 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) phi1)) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) phi1)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi2)) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi2)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi2)) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi2)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi2)) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi2)) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi2)) (fabs.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi2)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi2)) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi2)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi2)) phi1)) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi2)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 phi2) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 phi2) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 phi2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 phi2) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 phi2 (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 phi2 (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 phi2 (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) phi2)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) phi2)) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (fabs.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (fabs.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) phi2)) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 phi1) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 phi1 (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 phi1 (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 phi1 (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi2))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi2)) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (neg.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fabs.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (neg.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (fabs.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)) #s(literal 2 binary64) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 2 binary64))
(/.f64 (fma.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 2 binary64) (*.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (fma.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi2) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) phi1)) (cos.f64 (-.f64 (neg.f64 phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (fabs.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 phi2) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) phi1)) (cos.f64 (-.f64 (fabs.f64 phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (fabs.f64 phi1))) (cos.f64 (-.f64 phi2 (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 phi1))) (cos.f64 (-.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 phi1) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) phi2)) (cos.f64 (-.f64 (fabs.f64 phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 phi2))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi2)) (cos.f64 (-.f64 (neg.f64 phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 phi2))) (cos.f64 (-.f64 phi1 (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (fabs.f64 phi2))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (fabs.f64 phi1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (neg.f64 phi1))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (neg.f64 phi2))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fabs.f64 phi2))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) phi2)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) phi2))) #s(literal 2 binary64))
(/.f64 (-.f64 (neg.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal -2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 2 binary64))
(neg.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)))
(-.f64 (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)) (/.f64 (neg.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))
(+.f64 (*.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 phi2 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64)))) (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2) phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2) phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 phi2 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 phi2 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64))) (cos.f64 (/.f64 (-.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2) (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2) phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 phi2 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64)))))
(neg.f64 (-.f64 (neg.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))))
(fma.f64 (-.f64 (neg.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal -1/2 binary64) (fma.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))))
(fma.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2) phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 phi2 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2) phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 phi2 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 phi2 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2) phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2) phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 phi2 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64)))))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2) phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 phi2 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2) phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 phi2 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (fma.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))))
(fma.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (fma.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (fma.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (fma.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))))
(-.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2)))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2)) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2) (neg.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)))))
(-.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (neg.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))))
(-.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (neg.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))))
(+.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2)))
(+.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2) phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 phi2 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2) phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 phi2 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))))
(+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)))
(+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (neg.f64 (neg.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)))))
(+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)))
(neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(neg.f64 (sin.f64 (-.f64 phi2 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))
(sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))
(fma.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))
(fma.f64 (-.f64 (neg.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal -1/2 binary64) (*.f64 (neg.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (sin.f64 phi2)))
(fma.f64 (-.f64 (neg.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2))))
(fma.f64 (-.f64 (neg.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 (neg.f64 phi2))))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (sin.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2))))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 (neg.f64 phi2))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2) phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 phi2 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (sin.f64 phi2)))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2) phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 phi2 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2) phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 phi2 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 (neg.f64 phi2))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2) phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 phi2 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (sin.f64 phi2)))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2) phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 phi2 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2) phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 phi2 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 (neg.f64 phi2))))
(fma.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (sin.f64 phi2)))
(fma.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2))))
(fma.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 (neg.f64 phi2))))
(fma.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64) (-.f64 (*.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (*.f64 (neg.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (sin.f64 phi2)))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (neg.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 (neg.f64 phi2))))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (neg.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 (neg.f64 phi2))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (neg.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 (neg.f64 phi2))))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2)))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))
(+.f64 (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2))))
(+.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (neg.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (sin.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (neg.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2))))
(+.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 (neg.f64 phi2))))
(neg.f64 (-.f64 phi2 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (+.f64 (neg.f64 phi1) (neg.f64 phi2)))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (-.f64 (neg.f64 phi1) phi2))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (+.f64 (neg.f64 phi1) (neg.f64 phi2)))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (-.f64 (neg.f64 phi1) phi2))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (+.f64 (neg.f64 phi1) (neg.f64 phi2)))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 (neg.f64 phi1) phi2))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (+.f64 (neg.f64 phi1) (neg.f64 phi2)))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 (neg.f64 phi1) phi2))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 (neg.f64 phi1) (neg.f64 phi2)))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (-.f64 (neg.f64 phi1) phi2))
(-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (neg.f64 (neg.f64 phi2)))
(-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)
(-.f64 (neg.f64 phi1) (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (neg.f64 phi2)))
(-.f64 (neg.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (PI.f64) phi2))
(-.f64 (neg.f64 phi1) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))
(+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2) (neg.f64 phi1))
(+.f64 (neg.f64 phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 (neg.f64 phi1) (neg.f64 phi2)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (-.f64 (neg.f64 phi1) phi2))
(+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (neg.f64 phi2))
(+.f64 (neg.f64 phi1) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))
(neg.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (neg.f64 phi1)))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (neg.f64 phi1))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 phi1))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 phi1))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 phi1))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 (neg.f64 phi1)))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)
(-.f64 (neg.f64 phi1) (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 phi1))
(+.f64 (neg.f64 phi1) (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))
(+.f64 (neg.f64 phi1) (neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(neg.f64 phi1)
(sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))
(fma.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (-.f64 (neg.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2)))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2) phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 phi2 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2)))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2) phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 phi2 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2)))
(fma.f64 (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2)))
(fma.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64) (fma.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2))) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi2) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (neg.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (sin.f64 phi2)))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (neg.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2))))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 (neg.f64 phi2))))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(+.f64 (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64)) (fma.f64 (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)) #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2))))
(+.f64 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(+.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (sin.f64 phi2)))
(neg.f64 (-.f64 (neg.f64 phi2) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (-.f64 (neg.f64 phi1) (neg.f64 phi2)))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (+.f64 (neg.f64 phi1) phi2))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (-.f64 (neg.f64 phi1) (neg.f64 phi2)))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (+.f64 (neg.f64 phi1) phi2))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 (neg.f64 phi1) (neg.f64 phi2)))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (+.f64 (neg.f64 phi1) phi2))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 (neg.f64 phi1) (neg.f64 phi2)))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (+.f64 (neg.f64 phi1) phi2))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (-.f64 (neg.f64 phi1) (neg.f64 phi2)))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 (neg.f64 phi1) phi2))
(-.f64 (+.f64 phi2 (neg.f64 phi1)) (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (neg.f64 phi2))
(-.f64 (neg.f64 phi1) (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) phi2))
(-.f64 (neg.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (PI.f64) (neg.f64 phi2)))
(-.f64 (neg.f64 phi1) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))
(-.f64 phi2 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))
(+.f64 (+.f64 phi2 (neg.f64 phi1)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (neg.f64 phi1))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (-.f64 (neg.f64 phi1) (neg.f64 phi2)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 (neg.f64 phi1) phi2))
(+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (neg.f64 (neg.f64 phi2)))
(+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) phi2)
(+.f64 (neg.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))
(+.f64 phi2 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))
#s(literal 2 binary64)

eval353.0ms (2.1%)

Memory
55.6MiB live, 464.6MiB allocated; 63ms collecting garbage
Compiler

Compiled 31 242 to 10 996 computations (64.8% saved)

prune134.0ms (0.8%)

Memory
-26.1MiB live, 219.1MiB allocated; 44ms collecting garbage
Pruning

78 alts after pruning (77 fresh and 1 done)

PrunedKeptTotal
New1 615671 682
Fresh241034
Picked415
Done000
Total1 643781 721
Accuracy
92.9%
Counts
1 721 → 78
Alt Table
Click to see full alt table
StatusAccuracyProgram
42.9%
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
70.7%
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
47.6%
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
43.9%
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
70.5%
(*.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
57.3%
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
92.5%
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
70.7%
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
20.6%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 #s(approx (- (+ (neg phi1) (* (PI) 1/2)) phi2) (*.f64 #s(literal -1 binary64) phi2))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
92.5%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
29.4%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
43.1%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
24.9%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
25.1%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
46.8%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
70.8%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
92.5%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
45.4%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))))))) R)
54.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) #s(approx (cos lambda1) #s(literal 1 binary64))))))) R)
47.8%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) #s(approx (sin lambda1) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
55.4%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) #s(approx (sin lambda1) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
20.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (- lambda2 lambda1) (* (PI) 1/2)) (*.f64 #s(literal -1 binary64) lambda1)))))) R)
43.5%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.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))))) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
30.6%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
28.4%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
51.9%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
22.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
40.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
58.5%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
44.4%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
48.2%
(*.f64 (acos.f64 (+.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)))))) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
56.8%
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
42.5%
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
29.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) R)
92.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
54.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
45.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) R)
52.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
54.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
34.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
23.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
23.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
47.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
32.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
47.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
54.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
47.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1)))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
29.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
30.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
27.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2))))) R)
25.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2))))) R)
20.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
25.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
22.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
30.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
34.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
20.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
20.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
19.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1))) #s(literal 2 binary64)))) R)
19.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1))) #s(literal 2 binary64)))) R)
19.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
20.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
32.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
29.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
41.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
36.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
33.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
26.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #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))))))))) R)
28.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
20.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.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))))))))) R)
34.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
18.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
30.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
22.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
20.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) R)
26.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
22.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
28.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) R)
Compiler

Compiled 4 393 to 4 181 computations (4.8% saved)

series181.0ms (1.1%)

Memory
17.6MiB live, 299.3MiB allocated; 38ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0146412023
Stop Event
iter-limit
Counts
71 → 333
Calls
Call 1
Inputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 phi2))
(fma.f64 (sin.f64 phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(*.f64 #s(literal -1/2 binary64) (PI.f64))
#s(literal -1/2 binary64)
(PI.f64)
(*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(cos.f64 phi1)
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
#s(literal 1/2 binary64)
(cos.f64 phi2)
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(sin.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(cos.f64 lambda2)
(cos.f64 lambda1)
R
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))
#s(literal 1 binary64)
(*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))
(pow.f64 phi1 #s(literal 2 binary64))
#s(literal 2 binary64)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
(fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
(*.f64 (cos.f64 lambda1) (cos.f64 phi2))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(*.f64 (cos.f64 phi1) #s(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 #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))))
(*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))
(pow.f64 phi2 #s(literal 2 binary64))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64))
(+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))
(cos.f64 (+.f64 phi2 phi1))
(+.f64 phi2 phi1)
(cos.f64 (-.f64 phi1 phi2))
(-.f64 phi1 phi2)
(sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(-.f64 lambda2 lambda1)
(*.f64 (PI.f64) #s(literal 1/2 binary64))
Outputs
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (*.f64 R (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx R R)
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) R) (*.f64 R (acos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (acos.f64 (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1))))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1))))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
#s(approx (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
#s(approx (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1))))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))))) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos.f64 lambda2))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2)))))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (+.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) 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 (* (cos lambda2) (cos lambda1)) (+.f64 (cos.f64 lambda2) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 lambda2)))))
#s(approx (* (cos lambda2) (cos lambda1)) (+.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 lambda2) (cos lambda1)) (+.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 (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 (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (sin.f64 (neg.f64 lambda2))) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (sin.f64 (neg.f64 lambda2))) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (sin.f64 (neg.f64 lambda2)))))))) (*.f64 (cos.f64 phi1) (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 (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (- lambda1 lambda2) (-.f64 lambda1 lambda2))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.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 phi1) (cos.f64 phi2))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))))
#s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 phi2) (*.f64 phi1 (sin.f64 phi2))))
#s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 phi2)) (*.f64 phi1 (sin.f64 phi2)))))
#s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 phi2) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 phi2))))))))
#s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 phi2) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (*.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 phi2)) (*.f64 #s(literal 1/24 binary64) (cos.f64 phi2)))))))))
#s(approx (* (cos lambda1) (cos phi2)) (cos.f64 phi2))
#s(approx (* (cos lambda1) (cos phi2)) (+.f64 (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 phi2)))))
#s(approx (* (cos lambda1) (cos phi2)) (+.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 phi2)))))))
#s(approx (* (cos lambda1) (cos phi2)) (+.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (*.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 phi2)) (*.f64 #s(literal 1/24 binary64) (cos.f64 phi2))))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) (acos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 #s(literal -1/4 binary64) (*.f64 lambda1 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 lambda1 (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 #s(literal 1/12 binary64) (*.f64 lambda1 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))))
#s(approx (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))))))
#s(approx (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 #s(literal -1/4 binary64) (*.f64 lambda1 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))))))))
#s(approx (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 lambda1 (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 #s(literal 1/12 binary64) (*.f64 lambda1 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))))))))))
#s(approx (sin (+ (- lambda2 lambda1) (* (PI) 1/2))) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ (- lambda2 lambda1) (* (PI) 1/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) 1/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) 1/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) 1/2)) (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (- lambda2 lambda1) (* (PI) 1/2)) (+.f64 lambda2 (fma.f64 #s(literal -1 binary64) lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (- lambda2 lambda1) lambda2)
#s(approx (- lambda2 lambda1) (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (*.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
#s(approx (sin lambda1) (sin.f64 lambda1))
#s(approx (* (cos lambda2) (cos lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
#s(approx (cos lambda1) (cos.f64 lambda1))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
#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 (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos lambda1) (cos phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))))
#s(approx (sin (+ (- lambda2 lambda1) (* (PI) 1/2))) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))
#s(approx (+ (- lambda2 lambda1) (* (PI) 1/2)) (*.f64 #s(literal -1 binary64) lambda1))
#s(approx (+ (- lambda2 lambda1) (* (PI) 1/2)) (*.f64 lambda1 (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) lambda1) (/.f64 lambda2 lambda1)) #s(literal 1 binary64))))
#s(approx (- lambda2 lambda1) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi1) (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 (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) R) (*.f64 R (acos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 lambda2 (fma.f64 #s(literal -1 binary64) lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) (acos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 lambda2 (fma.f64 #s(literal -1 binary64) lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 lambda2 (fma.f64 #s(literal -1 binary64) lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (+.f64 lambda2 (fma.f64 #s(literal -1 binary64) lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))))
#s(approx (sin (+ (- lambda2 lambda1) (* (PI) 1/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) 1/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 (- lambda2 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1))))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1))))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1))))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
#s(approx (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
#s(approx (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1))))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)))))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (+.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) (*.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 lambda2) (cos lambda1)) (+.f64 (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 lambda1)))))
#s(approx (* (cos lambda2) (cos lambda1)) (+.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 lambda2) (cos lambda1)) (+.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 (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 (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos 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 phi1) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos 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 phi1) (cos.f64 phi2))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (*.f64 (cos.f64 phi1) (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (sin.f64 lambda1))))) (*.f64 (cos.f64 phi1) (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (cos.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 phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (fma.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda2 (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (fma.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 #s(literal -1/12 binary64) (*.f64 lambda2 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))))
#s(approx (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))))))
#s(approx (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda2 (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))))))))
#s(approx (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 #s(literal -1/12 binary64) (*.f64 lambda2 (*.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))))))))))
#s(approx (sin (+ (- lambda2 lambda1) (* (PI) 1/2))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1)))
#s(approx (sin (+ (- lambda2 lambda1) (* (PI) 1/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) 1/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) 1/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) 1/2)) (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) lambda1))
#s(approx (+ (- lambda2 lambda1) (* (PI) 1/2)) (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))
#s(approx (- lambda2 lambda1) (-.f64 lambda2 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) 1/2)) (*.f64 lambda2 (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) lambda2))) (/.f64 lambda1 lambda2))))
#s(approx (- lambda2 lambda1) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2)))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi1) (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 (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) R) (*.f64 R (acos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) (acos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))))
#s(approx (sin (+ (- lambda2 lambda1) (* (PI) 1/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) 1/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 (- lambda2 lambda1) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 phi1 (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi2) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (sin.f64 phi2)))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 phi2))))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi2) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 phi2))))))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.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)) (sin.f64 phi2)) (*.f64 #s(literal 1/120 binary64) (sin.f64 phi2)))))))))
#s(approx (sin phi1) phi1)
#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 (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 phi1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 phi1 (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (fma.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (fma.f64 phi1 (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))))) (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 phi1 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))))
#s(approx (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 phi1 (+.f64 (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 phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 phi1 (+.f64 (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 (* (cos phi1) (sin (* 1/2 (PI)))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (cos phi1) (sin (* 1/2 (PI)))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* (cos phi1) (sin (* 1/2 (PI)))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.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 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/24 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#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 (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 (sin.f64 phi2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi1 #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 phi1 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (* -1/2 (pow phi1 2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))
#s(approx (pow phi1 2) (pow.f64 phi1 #s(literal 2 binary64)))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 (sin.f64 phi2)))))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* (cos phi1) (cos phi2)) (+.f64 (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 phi2)))))
#s(approx (* (cos phi1) (cos phi2)) (+.f64 (cos.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 phi2)))))))
#s(approx (* (cos phi1) (cos phi2)) (+.f64 (cos.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.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)) (cos.f64 phi2)) (*.f64 #s(literal 1/24 binary64) (cos.f64 phi2))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (cos.f64 phi2) (cos.f64 (neg.f64 phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (cos.f64 phi2) (cos.f64 (neg.f64 phi2)))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (sin.f64 phi2) (sin.f64 (neg.f64 phi2)))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (cos.f64 phi2) (cos.f64 (neg.f64 phi2)))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (sin.f64 phi2) (sin.f64 (neg.f64 phi2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 phi2))))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (cos.f64 phi2) (cos.f64 (neg.f64 phi2)))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (sin.f64 phi2) (sin.f64 (neg.f64 phi2)))) (*.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 phi2))))) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi2) (*.f64 #s(literal -1/6 binary64) (sin.f64 (neg.f64 phi2))))) (*.f64 #s(literal -1/6 binary64) (sin.f64 phi2)))))))))))
#s(approx (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (sin.f64 phi2) (sin.f64 (neg.f64 phi2))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (cos.f64 phi2) (cos.f64 (neg.f64 phi2)))))))
#s(approx (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (cos.f64 phi2) (cos.f64 (neg.f64 phi2)))) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (sin.f64 phi2) (sin.f64 (neg.f64 phi2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 phi2)))))))))))
#s(approx (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (cos.f64 phi2) (cos.f64 (neg.f64 phi2)))) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (sin.f64 phi2) (sin.f64 (neg.f64 phi2)))) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi2) (*.f64 #s(literal -1/6 binary64) (sin.f64 (neg.f64 phi2)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 phi2))))))))))))
#s(approx (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (cos.f64 (neg.f64 phi2)))))
#s(approx (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (+.f64 (sin.f64 phi2) (sin.f64 (neg.f64 phi2)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (cos.f64 (neg.f64 phi2))))))
#s(approx (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (cos.f64 (neg.f64 phi2))) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (+.f64 (sin.f64 phi2) (sin.f64 (neg.f64 phi2))) (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 phi2))))))))))
#s(approx (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 phi2) (cos.f64 (neg.f64 phi2))) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (+.f64 (sin.f64 phi2) (sin.f64 (neg.f64 phi2))) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi2) (*.f64 #s(literal -1/6 binary64) (sin.f64 (neg.f64 phi2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 phi2)))))))))))
#s(approx (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (+.f64 (cos.f64 phi2) (cos.f64 (neg.f64 phi2))))
#s(approx (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (+.f64 (cos.f64 phi2) (+.f64 (cos.f64 (neg.f64 phi2)) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (+.f64 (sin.f64 phi2) (sin.f64 (neg.f64 phi2))))))))
#s(approx (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (+.f64 (cos.f64 phi2) (+.f64 (cos.f64 (neg.f64 phi2)) (*.f64 phi1 (-.f64 (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 phi2))))) (+.f64 (sin.f64 phi2) (sin.f64 (neg.f64 phi2))))))))
#s(approx (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (+.f64 (cos.f64 phi2) (+.f64 (cos.f64 (neg.f64 phi2)) (*.f64 phi1 (-.f64 (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (*.f64 phi1 (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi2) (*.f64 #s(literal -1/6 binary64) (sin.f64 (neg.f64 phi2))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 phi2)))))) (+.f64 (sin.f64 phi2) (sin.f64 (neg.f64 phi2))))))))
#s(approx (cos (+ phi2 phi1)) (+.f64 (cos.f64 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (sin.f64 phi2)))))
#s(approx (cos (+ phi2 phi1)) (+.f64 (cos.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 phi2))) (sin.f64 phi2)))))
#s(approx (cos (+ phi2 phi1)) (+.f64 (cos.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (*.f64 #s(literal 1/6 binary64) (*.f64 phi1 (sin.f64 phi2))))) (sin.f64 phi2)))))
#s(approx (+ phi2 phi1) phi2)
#s(approx (+ phi2 phi1) (+.f64 phi1 phi2))
#s(approx (cos (- phi1 phi2)) (cos.f64 (neg.f64 phi2)))
#s(approx (cos (- phi1 phi2)) (+.f64 (cos.f64 (neg.f64 phi2)) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (sin.f64 (neg.f64 phi2))))))
#s(approx (cos (- phi1 phi2)) (+.f64 (cos.f64 (neg.f64 phi2)) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 (neg.f64 phi2)))) (sin.f64 (neg.f64 phi2))))))
#s(approx (cos (- phi1 phi2)) (+.f64 (cos.f64 (neg.f64 phi2)) (*.f64 phi1 (-.f64 (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 phi2)) (*.f64 #s(literal 1/6 binary64) (*.f64 phi1 (sin.f64 (neg.f64 phi2)))))) (sin.f64 (neg.f64 phi2))))))
#s(approx (- phi1 phi2) (*.f64 #s(literal -1 binary64) phi2))
#s(approx (- phi1 phi2) (-.f64 phi1 phi2))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
#s(approx (sin phi1) (sin.f64 phi1))
#s(approx (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1))))
#s(approx (* (cos phi1) (sin (* 1/2 (PI)))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (cos phi1) (cos.f64 phi1))
#s(approx (+ 1 (* -1/2 (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/2 binary64))))
#s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) phi1))))
#s(approx (* (cos phi1) (cos phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
#s(approx (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))))
#s(approx (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))))
#s(approx (cos (+ phi2 phi1)) (cos.f64 (+.f64 phi1 phi2)))
#s(approx (+ phi2 phi1) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
#s(approx (cos (- phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))
#s(approx (- phi1 phi2) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 phi2 phi1)))))
#s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) phi1))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) R) (*.f64 R (acos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (cos.f64 (neg.f64 (+.f64 phi2 (*.f64 #s(literal -1 binary64) phi1)))) (cos.f64 (-.f64 phi2 (*.f64 #s(literal -1 binary64) phi1))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) (acos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (cos.f64 (neg.f64 (+.f64 phi2 (*.f64 #s(literal -1 binary64) phi1)))) (cos.f64 (-.f64 phi2 (*.f64 #s(literal -1 binary64) phi1))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (cos.f64 (neg.f64 (+.f64 phi2 (*.f64 #s(literal -1 binary64) phi1)))) (cos.f64 (-.f64 phi2 (*.f64 #s(literal -1 binary64) phi1))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (cos.f64 (neg.f64 (+.f64 phi2 (*.f64 #s(literal -1 binary64) phi1)))) (cos.f64 (-.f64 phi2 (*.f64 #s(literal -1 binary64) phi1)))))))
#s(approx (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (neg.f64 (+.f64 phi2 (*.f64 #s(literal -1 binary64) phi1)))) (cos.f64 (-.f64 phi2 (*.f64 #s(literal -1 binary64) phi1))))))
#s(approx (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (+.f64 (cos.f64 (neg.f64 (+.f64 phi2 (*.f64 #s(literal -1 binary64) phi1)))) (cos.f64 (-.f64 phi2 (*.f64 #s(literal -1 binary64) phi1)))))
#s(approx (cos (+ phi2 phi1)) (cos.f64 (-.f64 phi2 (*.f64 #s(literal -1 binary64) phi1))))
#s(approx (+ phi2 phi1) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 phi2 phi1)) #s(literal 1 binary64)))))
#s(approx (cos (- phi1 phi2)) (cos.f64 (neg.f64 (+.f64 phi2 (*.f64 #s(literal -1 binary64) phi1)))))
#s(approx (- phi1 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (-.f64 (/.f64 phi2 phi1) #s(literal 1 binary64)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1))))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 (sin.f64 phi1)))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1)))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1))))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1))))))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.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 phi1)) (*.f64 #s(literal 1/120 binary64) (sin.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 (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1))))))))))
#s(approx (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (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 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))))))
#s(approx (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1))))))))))
#s(approx (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (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)) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (*.f64 #s(literal 1/24 binary64) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.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)))))
#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 (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 (sin.f64 phi1)))))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 (sin.f64 phi1)))))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))
#s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))
#s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi2 (+.f64 phi1 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 (cos.f64 lambda1)))))))
#s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi2 (+.f64 phi1 (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi2))))))))
#s(approx (* (cos lambda1) (cos phi2)) (+.f64 (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda1)))))
#s(approx (* (cos lambda1) (cos phi2)) (+.f64 (cos.f64 lambda1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 lambda1)))))))
#s(approx (* (cos lambda1) (cos phi2)) (+.f64 (cos.f64 lambda1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.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)) (cos.f64 lambda1)) (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda1))))))))
#s(approx (* (cos phi1) (cos phi2)) (+.f64 (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 phi1)))))
#s(approx (* (cos phi1) (cos phi2)) (+.f64 (cos.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (cos.f64 phi1)))))))
#s(approx (* (cos phi1) (cos phi2)) (+.f64 (cos.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.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)) (cos.f64 phi1)) (*.f64 #s(literal 1/24 binary64) (cos.f64 phi1))))))))
#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 (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1 binary64) (sin.f64 phi1)))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1 binary64) (sin.f64 phi1))))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1 binary64) (sin.f64 phi1)))) (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))) (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi1) (*.f64 #s(literal 1/6 binary64) (sin.f64 phi1)))) (*.f64 #s(literal -1/6 binary64) (sin.f64 phi1)))))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))
#s(approx (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1 binary64) (sin.f64 phi1))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))
#s(approx (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1 binary64) (sin.f64 phi1)))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))
#s(approx (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1 binary64) (sin.f64 phi1)))) (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi1) (*.f64 #s(literal 1/6 binary64) (sin.f64 phi1))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)))))
#s(approx (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (+.f64 (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1 binary64) (sin.f64 phi1)))))))
#s(approx (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (+.f64 (cos.f64 phi1) (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 (cos.f64 phi1)) (*.f64 #s(literal -1/2 binary64) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1 binary64) (sin.f64 phi1))))))))
#s(approx (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (+.f64 (cos.f64 phi1) (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1 binary64) (sin.f64 phi1))) (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi1) (*.f64 #s(literal 1/6 binary64) (sin.f64 phi1)))))))))))
#s(approx (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (*.f64 #s(literal 2 binary64) (cos.f64 phi1)))
#s(approx (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (fma.f64 #s(literal -1 binary64) (*.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1 binary64) (sin.f64 phi1)))) (*.f64 #s(literal 2 binary64) (cos.f64 phi1))))
#s(approx (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (fma.f64 #s(literal 2 binary64) (cos.f64 phi1) (*.f64 phi2 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 phi2 (cos.f64 phi1))) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1 binary64) (sin.f64 phi1)))))))
#s(approx (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (fma.f64 #s(literal 2 binary64) (cos.f64 phi1) (*.f64 phi2 (-.f64 (*.f64 phi2 (fma.f64 #s(literal -1 binary64) (cos.f64 phi1) (*.f64 #s(literal -1 binary64) (*.f64 phi2 (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi1) (*.f64 #s(literal 1/6 binary64) (sin.f64 phi1))))))) (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1 binary64) (sin.f64 phi1)))))))
#s(approx (cos (+ phi2 phi1)) (+.f64 (cos.f64 phi1) (*.f64 #s(literal -1 binary64) (*.f64 phi2 (sin.f64 phi1)))))
#s(approx (cos (+ phi2 phi1)) (+.f64 (cos.f64 phi1) (*.f64 phi2 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 (cos.f64 phi1))) (sin.f64 phi1)))))
#s(approx (cos (+ phi2 phi1)) (+.f64 (cos.f64 phi1) (*.f64 phi2 (-.f64 (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 #s(literal 1/6 binary64) (*.f64 phi2 (sin.f64 phi1))))) (sin.f64 phi1)))))
#s(approx (cos (- phi1 phi2)) (+.f64 (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1))))
#s(approx (cos (- phi1 phi2)) (+.f64 (cos.f64 phi1) (*.f64 phi2 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 (cos.f64 phi1))) (*.f64 #s(literal -1 binary64) (sin.f64 phi1))))))
#s(approx (cos (- phi1 phi2)) (+.f64 (cos.f64 phi1) (*.f64 phi2 (-.f64 (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi1) (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 (sin.f64 phi1))))) (*.f64 #s(literal -1 binary64) (sin.f64 phi1))))))
#s(approx (- phi1 phi2) (+.f64 phi1 (*.f64 #s(literal -1 binary64) phi2)))
#s(approx (sin phi2) (sin.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))))
#s(approx (+ phi2 phi1) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
#s(approx (- phi1 phi2) (*.f64 phi2 (-.f64 (/.f64 phi1 phi2) #s(literal 1 binary64))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) R) (*.f64 R (acos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (cos.f64 (+.f64 phi1 (*.f64 #s(literal -1 binary64) phi2))) (cos.f64 (-.f64 phi1 (*.f64 #s(literal -1 binary64) phi2))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) (acos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (cos.f64 (+.f64 phi1 (*.f64 #s(literal -1 binary64) phi2))) (cos.f64 (-.f64 phi1 (*.f64 #s(literal -1 binary64) phi2))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (cos.f64 (+.f64 phi1 (*.f64 #s(literal -1 binary64) phi2))) (cos.f64 (-.f64 phi1 (*.f64 #s(literal -1 binary64) phi2))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (+.f64 (cos.f64 (+.f64 phi1 (*.f64 #s(literal -1 binary64) phi2))) (cos.f64 (-.f64 phi1 (*.f64 #s(literal -1 binary64) phi2)))))))
#s(approx (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (*.f64 #s(literal -1 binary64) phi2))) (cos.f64 (-.f64 phi1 (*.f64 #s(literal -1 binary64) phi2))))))
#s(approx (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (+.f64 (cos.f64 (+.f64 phi1 (*.f64 #s(literal -1 binary64) phi2))) (cos.f64 (-.f64 phi1 (*.f64 #s(literal -1 binary64) phi2)))))
#s(approx (cos (+ phi2 phi1)) (cos.f64 (-.f64 phi1 (*.f64 #s(literal -1 binary64) phi2))))
#s(approx (+ phi2 phi1) (*.f64 #s(literal -1 binary64) (*.f64 phi2 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 phi1 phi2)) #s(literal 1 binary64)))))
#s(approx (cos (- phi1 phi2)) (cos.f64 (+.f64 phi1 (*.f64 #s(literal -1 binary64) phi2))))
#s(approx (- phi1 phi2) (*.f64 #s(literal -1 binary64) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 phi1 phi2))))))
Calls

15 calls:

TimeVariablePointExpression
13.0ms
lambda1
@0
((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos (* -1/2 (PI))) (* -1/2 (PI)) -1/2 (PI) (* (cos phi1) (sin (* 1/2 (PI)))) (cos phi1) (sin (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (sin lambda2) lambda2 (sin lambda1) lambda1 (* (cos lambda2) (cos lambda1)) (cos lambda2) (cos lambda1) R (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (cos (- lambda1 lambda2))) (cos phi1) (+ 1 (* -1/2 (pow phi1 2))) 1 (* -1/2 (pow phi1 2)) (pow phi1 2) 2 (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (* (cos lambda1) (cos phi2)) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (* (cos phi1) (cos phi2)) (cos phi2) (+ 1 (* -1/2 (pow phi2 2))) (* -1/2 (pow phi2 2)) (pow phi2 2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (cos (+ phi2 phi1)) (+ phi2 phi1) (cos (- phi1 phi2)) (- phi1 phi2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))) (+ (- lambda2 lambda1) (* (PI) 1/2)) (- lambda2 lambda1) (* (PI) 1/2))
12.0ms
phi1
@inf
((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos (* -1/2 (PI))) (* -1/2 (PI)) -1/2 (PI) (* (cos phi1) (sin (* 1/2 (PI)))) (cos phi1) (sin (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (sin lambda2) lambda2 (sin lambda1) lambda1 (* (cos lambda2) (cos lambda1)) (cos lambda2) (cos lambda1) R (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (cos (- lambda1 lambda2))) (cos phi1) (+ 1 (* -1/2 (pow phi1 2))) 1 (* -1/2 (pow phi1 2)) (pow phi1 2) 2 (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (* (cos lambda1) (cos phi2)) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (* (cos phi1) (cos phi2)) (cos phi2) (+ 1 (* -1/2 (pow phi2 2))) (* -1/2 (pow phi2 2)) (pow phi2 2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (cos (+ phi2 phi1)) (+ phi2 phi1) (cos (- phi1 phi2)) (- phi1 phi2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))) (+ (- lambda2 lambda1) (* (PI) 1/2)) (- lambda2 lambda1) (* (PI) 1/2))
11.0ms
lambda2
@inf
((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos (* -1/2 (PI))) (* -1/2 (PI)) -1/2 (PI) (* (cos phi1) (sin (* 1/2 (PI)))) (cos phi1) (sin (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (sin lambda2) lambda2 (sin lambda1) lambda1 (* (cos lambda2) (cos lambda1)) (cos lambda2) (cos lambda1) R (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (cos (- lambda1 lambda2))) (cos phi1) (+ 1 (* -1/2 (pow phi1 2))) 1 (* -1/2 (pow phi1 2)) (pow phi1 2) 2 (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (* (cos lambda1) (cos phi2)) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (* (cos phi1) (cos phi2)) (cos phi2) (+ 1 (* -1/2 (pow phi2 2))) (* -1/2 (pow phi2 2)) (pow phi2 2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (cos (+ phi2 phi1)) (+ phi2 phi1) (cos (- phi1 phi2)) (- phi1 phi2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))) (+ (- lambda2 lambda1) (* (PI) 1/2)) (- lambda2 lambda1) (* (PI) 1/2))
11.0ms
phi1
@-inf
((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos (* -1/2 (PI))) (* -1/2 (PI)) -1/2 (PI) (* (cos phi1) (sin (* 1/2 (PI)))) (cos phi1) (sin (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (sin lambda2) lambda2 (sin lambda1) lambda1 (* (cos lambda2) (cos lambda1)) (cos lambda2) (cos lambda1) R (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (cos (- lambda1 lambda2))) (cos phi1) (+ 1 (* -1/2 (pow phi1 2))) 1 (* -1/2 (pow phi1 2)) (pow phi1 2) 2 (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (* (cos lambda1) (cos phi2)) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (* (cos phi1) (cos phi2)) (cos phi2) (+ 1 (* -1/2 (pow phi2 2))) (* -1/2 (pow phi2 2)) (pow phi2 2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (cos (+ phi2 phi1)) (+ phi2 phi1) (cos (- phi1 phi2)) (- phi1 phi2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))) (+ (- lambda2 lambda1) (* (PI) 1/2)) (- lambda2 lambda1) (* (PI) 1/2))
10.0ms
phi2
@inf
((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos (* -1/2 (PI))) (* -1/2 (PI)) -1/2 (PI) (* (cos phi1) (sin (* 1/2 (PI)))) (cos phi1) (sin (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (cos phi2) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (sin lambda2) lambda2 (sin lambda1) lambda1 (* (cos lambda2) (cos lambda1)) (cos lambda2) (cos lambda1) R (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (cos (- lambda1 lambda2))) (cos phi1) (+ 1 (* -1/2 (pow phi1 2))) 1 (* -1/2 (pow phi1 2)) (pow phi1 2) 2 (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (* (cos lambda1) (cos phi2)) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (* (cos phi1) (cos phi2)) (cos phi2) (+ 1 (* -1/2 (pow phi2 2))) (* -1/2 (pow phi2 2)) (pow phi2 2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))))) (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2)))) (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (cos (+ phi2 phi1)) (+ phi2 phi1) (cos (- phi1 phi2)) (- phi1 phi2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))) (+ (- lambda2 lambda1) (* (PI) 1/2)) (- lambda2 lambda1) (* (PI) 1/2))

rewrite880.0ms (5.3%)

Memory
-123.9MiB live, 393.8MiB allocated; 1.1s collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
084878
0145846
1626726
23785726
010823693
129971693
Stop Event
saturated
node-limit
iter-limit
Counts
71 → 1 347
Calls
Call 1
Inputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 phi2))
(fma.f64 (sin.f64 phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(*.f64 #s(literal -1/2 binary64) (PI.f64))
#s(literal -1/2 binary64)
(PI.f64)
(*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(cos.f64 phi1)
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
#s(literal 1/2 binary64)
(cos.f64 phi2)
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(sin.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(cos.f64 lambda2)
(cos.f64 lambda1)
R
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))
#s(literal 1 binary64)
(*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))
(pow.f64 phi1 #s(literal 2 binary64))
#s(literal 2 binary64)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
(fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
(*.f64 (cos.f64 lambda1) (cos.f64 phi2))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(*.f64 (cos.f64 phi1) #s(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 #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))))
(*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))
(pow.f64 phi2 #s(literal 2 binary64))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64))
(+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))
(cos.f64 (+.f64 phi2 phi1))
(+.f64 phi2 phi1)
(cos.f64 (-.f64 phi1 phi2))
(-.f64 phi1 phi2)
(sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(-.f64 lambda2 lambda1)
(*.f64 (PI.f64) #s(literal 1/2 binary64))
Outputs
(*.f64 (acos.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(*.f64 R (acos.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(neg.f64 (-.f64 (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (neg.f64 (PI.f64)) #s(literal -1/2 binary64) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 #s(literal -1/2 binary64) (neg.f64 (PI.f64)) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(acos.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(neg.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (neg.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (neg.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (neg.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(*.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))
(*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1)))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 1/2 binary64)))))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) phi1)) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) phi1)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi2)) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi2)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi2)) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi2)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi2)) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi2)) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi2)) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi2)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi2)) (fabs.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi2)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi2)) phi1)) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi2)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 phi2) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 phi2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 phi2) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 phi2) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 phi2 (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 phi2 (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) phi2)) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) phi2)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (fabs.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (fabs.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) phi2)) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 phi1) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 phi1 (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 phi1 (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi2))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi2))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi2)) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (neg.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fabs.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi2) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (-.f64 (neg.f64 phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (fabs.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 phi2) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) phi1)) (cos.f64 (-.f64 (fabs.f64 phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (fabs.f64 phi1))) (cos.f64 (-.f64 phi2 (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 phi2))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 phi1) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) phi2)) (cos.f64 (-.f64 (fabs.f64 phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 phi2))) (cos.f64 (-.f64 phi1 (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (neg.f64 phi1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (fabs.f64 phi1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (neg.f64 phi2))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fabs.f64 phi2))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) phi2)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(neg.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
(fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(-.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (neg.f64 (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
(+.f64 (*.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))
(+.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))
(/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) #s(literal 2 binary64) (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal -1/2 binary64) phi1)) (cos.f64 phi1))) #s(literal 2 binary64))
(neg.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
(sin.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)))
(fma.f64 (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal -1/2 binary64) phi1)) (cos.f64 phi1)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(fma.f64 (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal -1/2 binary64) phi1)) (cos.f64 phi1)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(fma.f64 (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal -1/2 binary64) phi1)) (cos.f64 phi1)) #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(fma.f64 (sin.f64 phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(fma.f64 (sin.f64 phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 phi1)))
(-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (neg.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(cos.f64 (neg.f64 (fabs.f64 phi1)))
(cos.f64 (fabs.f64 (fabs.f64 phi1)))
(cos.f64 (neg.f64 phi1))
(cos.f64 (fabs.f64 phi1))
(cos.f64 phi1)
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (fma.f64 (fabs.f64 (PI.f64)) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 (PI.f64) #s(literal -1/2 binary64))))
(fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(cos.f64 (neg.f64 (*.f64 (fabs.f64 (PI.f64)) #s(literal 1/2 binary64))))
(cos.f64 (fabs.f64 (*.f64 (fabs.f64 (PI.f64)) #s(literal 1/2 binary64))))
(cos.f64 (*.f64 (fabs.f64 (PI.f64)) #s(literal 1/2 binary64)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(cos.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)))
(+.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(*.f64 (neg.f64 (PI.f64)) #s(literal 1/2 binary64))
(*.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal -1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (neg.f64 (PI.f64)))
(*.f64 (PI.f64) #s(literal -1/2 binary64))
(*.f64 #s(literal -1/2 binary64) (PI.f64))
(neg.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal -1/2 binary64)))
#s(literal -1/2 binary64)
(PI.f64)
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 (neg.f64 phi1)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (cos.f64 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fabs.f64 phi1))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) #s(literal 2 binary64) (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal -1/2 binary64) phi1)) (cos.f64 phi1))) #s(literal 2 binary64))
(neg.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
(sin.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)))
(fma.f64 (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal -1/2 binary64) phi1)) (cos.f64 phi1)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(fma.f64 (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal -1/2 binary64) phi1)) (cos.f64 phi1)) #s(literal 1/2 binary64) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(fma.f64 (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal -1/2 binary64) phi1)) (cos.f64 phi1)) #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(fma.f64 (sin.f64 phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(fma.f64 (sin.f64 phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 phi1)))
(-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (neg.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(cos.f64 (neg.f64 (fabs.f64 phi1)))
(cos.f64 (fabs.f64 (fabs.f64 phi1)))
(cos.f64 (neg.f64 phi1))
(cos.f64 (fabs.f64 phi1))
(cos.f64 phi1)
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (*.f64 (neg.f64 (neg.f64 (cos.f64 phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (neg.f64 (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(*.f64 (neg.f64 (PI.f64)) #s(literal -1/2 binary64))
(*.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(*.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(*.f64 #s(literal -1/2 binary64) (neg.f64 (PI.f64)))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(neg.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(sin.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))
(fma.f64 (sin.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(cos.f64 (neg.f64 (neg.f64 phi2)))
(cos.f64 (neg.f64 (fabs.f64 phi2)))
(cos.f64 (fabs.f64 (fabs.f64 phi2)))
(cos.f64 (neg.f64 phi2))
(cos.f64 (fabs.f64 phi2))
(cos.f64 phi2)
(+.f64 (*.f64 (sin.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(/.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 lambda1) (cos.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 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) #s(literal 4 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))) #s(literal 4 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 (+.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 (-.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))))) #s(literal 4 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))))) #s(literal 4 binary64))
(neg.f64 (-.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(sin.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (neg.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (neg.f64 (neg.f64 (*.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 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (neg.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))))
(-.f64 (*.f64 (sin.f64 lambda2) (cos.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.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 (sin.f64 lambda2) (sin.f64 (neg.f64 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(cos.f64 (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (fabs.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (neg.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(+.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)))
(sin.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda1)) (neg.f64 (neg.f64 lambda2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda1)) (neg.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda1)) (neg.f64 (fabs.f64 lambda2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda1)) (neg.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda1)) (fabs.f64 (fabs.f64 lambda2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda1)) (fabs.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda1)) (neg.f64 lambda2))) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda1)) (neg.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda1)) (fabs.f64 lambda2))) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda1)) (fabs.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda1)) lambda2)) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda1)) lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 lambda1)) (neg.f64 (neg.f64 lambda2)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 lambda1)) (neg.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 lambda1)) (neg.f64 (fabs.f64 lambda2)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 lambda1)) (neg.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 lambda1)) (fabs.f64 (fabs.f64 lambda2)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 lambda1)) (fabs.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 lambda1)) (neg.f64 lambda2))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 lambda1)) (neg.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 lambda1)) (fabs.f64 lambda2))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 lambda1)) (fabs.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 lambda1)) lambda2)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 lambda1)) lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 lambda1)) (neg.f64 (neg.f64 lambda2)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 lambda1)) (neg.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 lambda1)) (neg.f64 (fabs.f64 lambda2)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 lambda1)) (neg.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 lambda1)) (fabs.f64 (fabs.f64 lambda2)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 lambda1)) (fabs.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 lambda1)) (neg.f64 lambda2))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 lambda1)) (neg.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 lambda1)) (fabs.f64 lambda2))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 lambda1)) (fabs.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 lambda1)) lambda2)) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 lambda1)) lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (-.f64 (neg.f64 lambda1) (neg.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 lambda1) (neg.f64 (fabs.f64 lambda2)))) (cos.f64 (-.f64 (neg.f64 lambda1) (neg.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 lambda1) (fabs.f64 (fabs.f64 lambda2)))) (cos.f64 (-.f64 (neg.f64 lambda1) (fabs.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 lambda1) (neg.f64 (neg.f64 lambda2)))) (cos.f64 (-.f64 (fabs.f64 lambda1) (neg.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 lambda1) (neg.f64 (fabs.f64 lambda2)))) (cos.f64 (-.f64 (fabs.f64 lambda1) (neg.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 lambda1) (fabs.f64 (fabs.f64 lambda2)))) (cos.f64 (-.f64 (fabs.f64 lambda1) (fabs.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda1 (neg.f64 (neg.f64 lambda2)))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda1 (neg.f64 (fabs.f64 lambda2)))) (cos.f64 (-.f64 lambda1 (neg.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda1 (fabs.f64 (fabs.f64 lambda2)))) (cos.f64 (-.f64 lambda1 (fabs.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda2)) (neg.f64 (neg.f64 lambda1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda2)) (neg.f64 (neg.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda2)) (neg.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda2)) (neg.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda2)) (fabs.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda2)) (fabs.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda2)) (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda2)) (fabs.f64 lambda1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda2)) (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda2)) lambda1)) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda2)) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 lambda2)) (neg.f64 (neg.f64 lambda1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 lambda2)) (neg.f64 (neg.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 lambda2)) (neg.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 lambda2)) (neg.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 lambda2)) (fabs.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 lambda2)) (fabs.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 lambda2)) (neg.f64 lambda1))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 lambda2)) (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 lambda2)) (fabs.f64 lambda1))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 lambda2)) (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 lambda2)) lambda1)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 lambda2)) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 lambda2)) (neg.f64 (neg.f64 lambda1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 lambda2)) (neg.f64 (neg.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 lambda2)) (neg.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 lambda2)) (neg.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 lambda2)) (fabs.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 lambda2)) (fabs.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 lambda2)) (neg.f64 lambda1))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 lambda2)) (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 lambda2)) (fabs.f64 lambda1))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 lambda2)) (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 lambda2)) lambda1)) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 lambda2)) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (-.f64 (neg.f64 lambda2) (neg.f64 (neg.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 lambda2) (neg.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 (neg.f64 lambda2) (neg.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 lambda2) (fabs.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 (neg.f64 lambda2) (fabs.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 lambda2) (neg.f64 (neg.f64 lambda1)))) (cos.f64 (-.f64 (fabs.f64 lambda2) (neg.f64 (neg.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 lambda2) (neg.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 (fabs.f64 lambda2) (neg.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 lambda2) (fabs.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 (fabs.f64 lambda2) (fabs.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 (neg.f64 lambda1)))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (neg.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 lambda2 (neg.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (fabs.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 lambda2 (fabs.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1))) (cos.f64 (+.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1))) (cos.f64 (+.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 lambda2)))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 lambda2)))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 lambda2)))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 lambda2))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 lambda2))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 lambda2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 lambda2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 lambda2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 lambda2))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 lambda2))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2)) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (neg.f64 (neg.f64 lambda2)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (neg.f64 (neg.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (neg.f64 (fabs.f64 lambda2)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (neg.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (fabs.f64 (fabs.f64 lambda2)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (fabs.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 lambda1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 lambda1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 lambda1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 lambda1))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 lambda1))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 lambda1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 lambda1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 lambda1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 lambda1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 lambda1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (neg.f64 (neg.f64 lambda1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (neg.f64 (neg.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (neg.f64 (fabs.f64 lambda1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (neg.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (fabs.f64 (fabs.f64 lambda1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (fabs.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #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 (neg.f64 lambda1) (fabs.f64 lambda2))) (cos.f64 (-.f64 (neg.f64 lambda1) (fabs.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (-.f64 (neg.f64 lambda1) 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 (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) lambda2)) (cos.f64 (-.f64 (fabs.f64 lambda1) lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 (neg.f64 lambda2)))) #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 (+.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 (neg.f64 lambda2) (fabs.f64 lambda1))) (cos.f64 (-.f64 (neg.f64 lambda2) (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (-.f64 (neg.f64 lambda2) 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 (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) lambda1)) (cos.f64 (-.f64 (fabs.f64 lambda2) lambda1))) #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 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (neg.f64 lambda2))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (neg.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (fabs.f64 lambda2))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (fabs.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (neg.f64 lambda1))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (fabs.f64 lambda1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #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)))
(sin.f64 (+.f64 (neg.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 lambda2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2))
(fma.f64 (sin.f64 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(cos.f64 (neg.f64 (neg.f64 lambda2)))
(cos.f64 (neg.f64 (fabs.f64 lambda2)))
(cos.f64 (fabs.f64 (fabs.f64 lambda2)))
(cos.f64 (neg.f64 lambda2))
(cos.f64 (fabs.f64 lambda2))
(cos.f64 lambda2)
(+.f64 (*.f64 (sin.f64 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1))
(fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(cos.f64 (neg.f64 (neg.f64 lambda1)))
(cos.f64 (neg.f64 (fabs.f64 lambda1)))
(cos.f64 (fabs.f64 (fabs.f64 lambda1)))
(cos.f64 (neg.f64 lambda1))
(cos.f64 (fabs.f64 lambda1))
(cos.f64 lambda1)
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
R
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))
(neg.f64 (-.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))))
(fma.f64 (neg.f64 (PI.f64)) #s(literal -1/2 binary64) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))))
(fma.f64 #s(literal -1/2 binary64) (neg.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(*.f64 #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda2 lambda1)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
(fma.f64 #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
(+.f64 (*.f64 #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(+.f64 (*.f64 #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
#s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(neg.f64 (-.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64))
(fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64))
(fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64))
(-.f64 (*.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64)) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 1/2 binary64))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64)))
#s(literal 1 binary64)
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1)
(*.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64))
(*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))
(*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))
(*.f64 (neg.f64 phi1) (neg.f64 phi1))
(*.f64 (fabs.f64 phi1) (fabs.f64 phi1))
(*.f64 phi1 phi1)
(pow.f64 phi1 #s(literal 2 binary64))
#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 lambda1) (cos.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 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) #s(literal 4 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))) #s(literal 4 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 (+.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 (-.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))))) #s(literal 4 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))))) #s(literal 4 binary64))
(neg.f64 (-.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(sin.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (neg.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (neg.f64 (neg.f64 (*.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 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (neg.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))))
(-.f64 (*.f64 (sin.f64 lambda2) (cos.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.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 (sin.f64 lambda2) (sin.f64 (neg.f64 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(cos.f64 (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (fabs.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (neg.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(+.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)))
(neg.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda1 (neg.f64 (neg.f64 lambda2)))
(-.f64 lambda1 lambda2)
(+.f64 (neg.f64 lambda2) (neg.f64 (neg.f64 lambda1)))
(+.f64 (neg.f64 lambda2) lambda1)
(+.f64 lambda1 (neg.f64 lambda2))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))))) R)
(*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))))))
(neg.f64 (-.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))))
(fma.f64 (neg.f64 (PI.f64)) #s(literal -1/2 binary64) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))))
(fma.f64 #s(literal -1/2 binary64) (neg.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))
(/.f64 (fma.f64 (*.f64 (sin.f64 phi2) phi1) #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 phi2)) (cos.f64 (+.f64 lambda1 phi2)))) #s(literal 2 binary64))
(neg.f64 (-.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) phi1)))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 phi2)) (cos.f64 (+.f64 lambda1 phi2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) phi1))
(fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) phi1))
(fma.f64 (sin.f64 phi2) phi1 (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi2) phi1 (neg.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
(fma.f64 (sin.f64 phi2) phi1 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
(fma.f64 phi1 (sin.f64 phi2) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(fma.f64 phi1 (sin.f64 phi2) (neg.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
(fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
(-.f64 (*.f64 (sin.f64 phi2) phi1) (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi2)) phi1))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (neg.f64 phi1) (sin.f64 phi2)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 (*.f64 (sin.f64 phi2) phi1)))
(+.f64 (*.f64 (sin.f64 phi2) phi1) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda1))) (cos.f64 phi2)))
(+.f64 (*.f64 (sin.f64 phi2) phi1) (neg.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))
(+.f64 (*.f64 (sin.f64 phi2) phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) phi1))
(*.f64 (+.f64 (cos.f64 (-.f64 lambda1 phi2)) (cos.f64 (+.f64 lambda1 phi2))) #s(literal 1/2 binary64))
(*.f64 (cos.f64 lambda1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (cos.f64 lambda1))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda1)) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda1)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda1)) (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda1)) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda1)) (fabs.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda1)) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda1)) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda1)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda1)) (fabs.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda1)) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 lambda1)) phi2)) (cos.f64 (-.f64 (neg.f64 (neg.f64 lambda1)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 lambda1)) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 lambda1)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 lambda1)) (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 lambda1)) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 lambda1)) (fabs.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 lambda1)) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 lambda1)) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 lambda1)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 lambda1)) (fabs.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 lambda1)) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 lambda1)) phi2)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 lambda1)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 lambda1)) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 lambda1)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 lambda1)) (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 lambda1)) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 lambda1)) (fabs.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 lambda1)) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 lambda1)) (neg.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 lambda1)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 lambda1)) (fabs.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 lambda1)) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 lambda1)) phi2)) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 lambda1)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 lambda1) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 lambda1) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 lambda1) (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 lambda1) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 lambda1) (fabs.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 lambda1) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 lambda1) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 lambda1) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 lambda1) (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 lambda1) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 lambda1) (fabs.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 lambda1) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda1 (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 lambda1 (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda1 (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 lambda1 (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda1 (fabs.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 lambda1 (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (neg.f64 lambda1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (neg.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (fabs.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (fabs.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 lambda1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (fabs.f64 lambda1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) lambda1)) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 (neg.f64 lambda1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 (neg.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (fabs.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) (fabs.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 lambda1))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (fabs.f64 lambda1))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) lambda1)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi2)) (neg.f64 (neg.f64 lambda1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi2)) (neg.f64 (neg.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi2)) (neg.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi2)) (neg.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi2)) (fabs.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi2)) (fabs.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi2)) (neg.f64 lambda1))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi2)) (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi2)) (fabs.f64 lambda1))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi2)) (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi2)) lambda1)) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi2)) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 (neg.f64 lambda1)))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 (neg.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (fabs.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 (neg.f64 phi2) (fabs.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (neg.f64 (neg.f64 lambda1)))) (cos.f64 (-.f64 (fabs.f64 phi2) (neg.f64 (neg.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (neg.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 (fabs.f64 phi2) (neg.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (fabs.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 (fabs.f64 phi2) (fabs.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 (neg.f64 lambda1)))) (cos.f64 (-.f64 phi2 (neg.f64 (neg.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 phi2 (neg.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (fabs.f64 (fabs.f64 lambda1)))) (cos.f64 (-.f64 phi2 (fabs.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi2))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi2))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi2)) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (neg.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (fabs.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 lambda1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 lambda1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 lambda1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 lambda1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 lambda1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 lambda1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 lambda1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 lambda1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 lambda1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 lambda1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1)) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (neg.f64 (neg.f64 lambda1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (neg.f64 (neg.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (neg.f64 (fabs.f64 lambda1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (neg.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (fabs.f64 (fabs.f64 lambda1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (fabs.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 lambda1 phi2)) (cos.f64 (+.f64 lambda1 phi2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 lambda1) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 lambda1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 lambda1) (fabs.f64 phi2))) (cos.f64 (-.f64 (neg.f64 lambda1) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 lambda1) phi2)) (cos.f64 (-.f64 (neg.f64 lambda1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 lambda1) (neg.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 lambda1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 lambda1) (fabs.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 lambda1) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 lambda1) phi2)) (cos.f64 (-.f64 (fabs.f64 lambda1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda1 (fabs.f64 phi2))) (cos.f64 (-.f64 lambda1 (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 lambda1))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (fabs.f64 lambda1))) (cos.f64 (-.f64 (neg.f64 phi2) (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) lambda1)) (cos.f64 (-.f64 (neg.f64 phi2) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (neg.f64 lambda1))) (cos.f64 (-.f64 (fabs.f64 phi2) (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (fabs.f64 lambda1))) (cos.f64 (-.f64 (fabs.f64 phi2) (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) lambda1)) (cos.f64 (-.f64 (fabs.f64 phi2) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 lambda1))) (cos.f64 (-.f64 phi2 (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (fabs.f64 lambda1))) (cos.f64 (-.f64 phi2 (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda1 phi2)) (cos.f64 (-.f64 phi2 lambda1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (neg.f64 phi2))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (fabs.f64 phi2))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) phi2)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (neg.f64 lambda1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (fabs.f64 lambda1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 lambda1 phi2)) (cos.f64 (+.f64 lambda1 phi2))) #s(literal 2 binary64))
(+.f64 (/.f64 (cos.f64 (+.f64 lambda1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 lambda1 phi2)) #s(literal 2 binary64)))
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1))))))
(neg.f64 (-.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1))))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1)))))))
(fma.f64 (neg.f64 (PI.f64)) #s(literal -1/2 binary64) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1)))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1)))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1)))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1)))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1)))))))
(fma.f64 #s(literal -1/2 binary64) (neg.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1)))))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1)))))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1))))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1)) #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(neg.f64 (-.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1))))
(fma.f64 (*.f64 (cos.f64 lambda1) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (cos.f64 phi1) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda1) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (cos.f64 phi1) (neg.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 lambda1) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1)))
(fma.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1) (neg.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (sin.f64 phi2)))
(fma.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (neg.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 lambda1) (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 lambda1) (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (neg.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 (cos.f64 lambda1) (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 lambda1)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 lambda1)) (neg.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1)))
(-.f64 (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1))) (cos.f64 lambda1)))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1))))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (neg.f64 (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1))))
(+.f64 (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1)) (*.f64 (neg.f64 (neg.f64 (sin.f64 phi1))) (sin.f64 phi2)))
(+.f64 (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1)) (neg.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1)))
(*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))))
#s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(neg.f64 (-.f64 (*.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 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #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))
(-.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/2 binary64))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)))
(*.f64 (*.f64 #s(literal -1/2 binary64) phi2) phi2)
(*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64))
(*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2))
(*.f64 phi2 (*.f64 phi2 #s(literal -1/2 binary64)))
(*.f64 (neg.f64 phi2) (neg.f64 phi2))
(*.f64 (fabs.f64 phi2) (fabs.f64 phi2))
(*.f64 phi2 phi2)
(pow.f64 phi2 #s(literal 2 binary64))
(*.f64 (acos.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(*.f64 R (acos.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(neg.f64 (-.f64 (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (neg.f64 (PI.f64)) #s(literal -1/2 binary64) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 #s(literal -1/2 binary64) (neg.f64 (PI.f64)) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(acos.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(neg.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (neg.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (neg.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (neg.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))
(*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1)))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 1/2 binary64)))))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi2)) phi1)) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi2)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi2)) phi1)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi2)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi2)) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi2)) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi2)) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi2)) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi2)) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi2)) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi2)) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi2)) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi2)) (fabs.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi2)) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi2)) phi1)) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi2)) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (neg.f64 phi2) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (neg.f64 (neg.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 phi2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 phi2) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 (fabs.f64 phi2) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 phi2 (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (fabs.f64 (fabs.f64 phi1)))) (cos.f64 (-.f64 phi2 (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (neg.f64 phi1)) phi2)) (cos.f64 (-.f64 (neg.f64 (neg.f64 phi1)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 phi2))) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (fabs.f64 phi1)) phi2)) (cos.f64 (-.f64 (neg.f64 (fabs.f64 phi1)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (fabs.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) (fabs.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 (fabs.f64 phi1)) phi2)) (cos.f64 (-.f64 (fabs.f64 (fabs.f64 phi1)) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 (fabs.f64 phi1) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 (neg.f64 phi2)))) (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (neg.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 phi1 (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 (fabs.f64 phi2)))) (cos.f64 (-.f64 phi1 (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi1))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi2))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi2))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi2)) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (neg.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fabs.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi2) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (-.f64 (neg.f64 phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (fabs.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 phi2) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) phi1)) (cos.f64 (-.f64 (fabs.f64 phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (fabs.f64 phi1))) (cos.f64 (-.f64 phi2 (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 phi2))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 phi1) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) phi2)) (cos.f64 (-.f64 (fabs.f64 phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 phi2))) (cos.f64 (-.f64 phi1 (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (neg.f64 phi1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (fabs.f64 phi1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (neg.f64 phi2))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fabs.f64 phi2))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) phi2)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(neg.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
(fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(-.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (neg.f64 (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
(+.f64 (*.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))
(+.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(+.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 1/2 binary64)))) (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (/.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 phi1 phi2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (+.f64 phi2 phi1))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 phi1 phi2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (+.f64 phi2 phi1))) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (/.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (+.f64 phi2 phi1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (+.f64 phi2 phi1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 phi1 phi2))) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (/.f64 (+.f64 (-.f64 phi2 phi1) (-.f64 (neg.f64 phi1) phi2)) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 phi2 phi1) (-.f64 (neg.f64 phi1) phi2)) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (/.f64 (+.f64 (-.f64 phi2 phi1) (fabs.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 phi2 phi1) (fabs.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (/.f64 (+.f64 (-.f64 phi2 phi1) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 phi2 phi1) (+.f64 phi2 phi1)) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (/.f64 (+.f64 (fabs.f64 (-.f64 phi2 phi1)) (-.f64 (neg.f64 phi1) phi2)) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (fabs.f64 (-.f64 phi2 phi1)) (-.f64 (neg.f64 phi1) phi2)) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (/.f64 (+.f64 (fabs.f64 (-.f64 phi2 phi1)) (fabs.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (fabs.f64 (-.f64 phi2 phi1)) (fabs.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (/.f64 (+.f64 (fabs.f64 (-.f64 phi2 phi1)) (+.f64 phi2 phi1)) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (fabs.f64 (-.f64 phi2 phi1)) (+.f64 phi2 phi1)) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (/.f64 (+.f64 (-.f64 phi1 phi2) (-.f64 (neg.f64 phi1) phi2)) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 phi1 phi2) (-.f64 (neg.f64 phi1) phi2)) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (/.f64 (+.f64 (-.f64 phi1 phi2) (fabs.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 phi1 phi2) (fabs.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 1/2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 phi1 phi2) (+.f64 phi2 phi1)) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (/.f64 (+.f64 (-.f64 (neg.f64 phi1) phi2) (-.f64 phi2 phi1)) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (neg.f64 phi1) phi2) (-.f64 phi2 phi1)) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (/.f64 (+.f64 (-.f64 (neg.f64 phi1) phi2) (fabs.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (neg.f64 phi1) phi2) (fabs.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (/.f64 (+.f64 (-.f64 (neg.f64 phi1) phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 (neg.f64 phi1) phi2) (-.f64 phi1 phi2)) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 phi2 phi1)) (-.f64 phi2 phi1)) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (fabs.f64 (+.f64 phi2 phi1)) (-.f64 phi2 phi1)) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 phi2 phi1)) (fabs.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (fabs.f64 (+.f64 phi2 phi1)) (fabs.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (/.f64 (+.f64 (fabs.f64 (+.f64 phi2 phi1)) (-.f64 phi1 phi2)) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (fabs.f64 (+.f64 phi2 phi1)) (-.f64 phi1 phi2)) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (/.f64 (+.f64 (+.f64 phi2 phi1) (fabs.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64))) (cos.f64 (/.f64 (-.f64 (+.f64 phi2 phi1) (fabs.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 1/2 binary64)))))
(neg.f64 (-.f64 (neg.f64 (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (+.f64 phi2 phi1))))
(fma.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 1/2 binary64)))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (cos.f64 (+.f64 phi2 phi1))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (cos.f64 (+.f64 phi2 phi1))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (cos.f64 (+.f64 phi2 phi1))))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 1/2 binary64)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (cos.f64 (+.f64 phi2 phi1))))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (cos.f64 (+.f64 phi2 phi1))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (cos.f64 (+.f64 phi2 phi1))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (cos.f64 (+.f64 phi2 phi1))))
(-.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(-.f64 (cos.f64 (-.f64 phi2 phi1)) (neg.f64 (cos.f64 (+.f64 phi2 phi1))))
(-.f64 (cos.f64 (+.f64 phi2 phi1)) (neg.f64 (cos.f64 (-.f64 phi2 phi1))))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (cos.f64 (-.f64 phi2 phi1))))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (neg.f64 (cos.f64 (-.f64 phi2 phi1)))))
(+.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 1/2 binary64)))))
(+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(+.f64 (cos.f64 (+.f64 phi2 phi1)) (neg.f64 (neg.f64 (cos.f64 (-.f64 phi2 phi1)))))
(+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1)))
(+.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (cos.f64 (+.f64 phi2 phi1))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(neg.f64 (-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(sin.f64 (+.f64 (-.f64 (neg.f64 phi1) phi2) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 (+.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (+.f64 phi2 phi1)))
(fma.f64 (sin.f64 (+.f64 phi2 phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (+.f64 phi2 phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 1/2 binary64)))) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(cos.f64 (neg.f64 (fabs.f64 (+.f64 phi2 phi1))))
(cos.f64 (fabs.f64 (fabs.f64 (+.f64 phi2 phi1))))
(cos.f64 (-.f64 (neg.f64 phi1) phi2))
(cos.f64 (fabs.f64 (+.f64 phi2 phi1)))
(cos.f64 (+.f64 phi2 phi1))
(+.f64 (*.f64 (sin.f64 (+.f64 phi2 phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 (+.f64 phi2 phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(neg.f64 (-.f64 (neg.f64 phi1) phi2))
(-.f64 phi2 (neg.f64 phi1))
(-.f64 phi1 (neg.f64 phi2))
(+.f64 phi2 (neg.f64 (neg.f64 phi1)))
(+.f64 phi2 phi1)
(+.f64 phi1 phi2)
(/.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (*.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (+.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 4 binary64))
(sin.f64 (+.f64 (-.f64 phi2 phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (fabs.f64 (-.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 phi1 phi2)))
(fma.f64 (sin.f64 (-.f64 phi1 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (-.f64 phi2 phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 phi2 phi1) (-.f64 phi2 phi1)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(cos.f64 (neg.f64 (fabs.f64 (-.f64 phi2 phi1))))
(cos.f64 (fabs.f64 (fabs.f64 (-.f64 phi2 phi1))))
(cos.f64 (-.f64 phi2 phi1))
(cos.f64 (fabs.f64 (-.f64 phi2 phi1)))
(cos.f64 (-.f64 phi1 phi2))
(+.f64 (*.f64 (sin.f64 (-.f64 phi1 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 (-.f64 phi2 phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(neg.f64 (-.f64 phi2 phi1))
(-.f64 phi1 (neg.f64 (neg.f64 phi2)))
(-.f64 phi1 phi2)
(+.f64 (neg.f64 phi2) phi1)
(+.f64 phi1 (neg.f64 phi2))
(/.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 lambda1) (cos.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 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) #s(literal 4 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))) #s(literal 4 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 (+.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 (-.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))))) #s(literal 4 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))))) #s(literal 4 binary64))
(neg.f64 (-.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(sin.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (neg.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (neg.f64 (neg.f64 (*.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 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (neg.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))))
(-.f64 (*.f64 (sin.f64 lambda2) (cos.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)))))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.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 (sin.f64 lambda2) (sin.f64 (neg.f64 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(cos.f64 (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (fabs.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (neg.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(+.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)))
(neg.f64 (-.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)) (-.f64 lambda2 lambda1)))
(neg.f64 (-.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda2))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (-.f64 lambda2 lambda1))
(fma.f64 (neg.f64 (PI.f64)) #s(literal -1/2 binary64) (-.f64 lambda2 lambda1))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (-.f64 lambda2 lambda1))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 lambda2 lambda1))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (-.f64 lambda2 lambda1))
(fma.f64 #s(literal -1/2 binary64) (neg.f64 (PI.f64)) (-.f64 lambda2 lambda1))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) lambda1)
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (-.f64 lambda1 lambda2))
(-.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal -1/2 binary64)))
(-.f64 lambda2 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda2) (neg.f64 lambda1))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (-.f64 lambda2 lambda1))
(+.f64 (-.f64 lambda2 lambda1) (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))
(+.f64 (-.f64 lambda2 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(+.f64 lambda2 (-.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal -1/2 binary64))))
(+.f64 lambda2 (neg.f64 (-.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(+.f64 lambda2 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(neg.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda2 (neg.f64 (neg.f64 lambda1)))
(-.f64 lambda2 lambda1)
(+.f64 (neg.f64 lambda1) (neg.f64 (neg.f64 lambda2)))
(+.f64 (neg.f64 lambda1) lambda2)
(+.f64 lambda2 (neg.f64 lambda1))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(*.f64 (neg.f64 (PI.f64)) #s(literal -1/2 binary64))
(*.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(*.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(*.f64 #s(literal -1/2 binary64) (neg.f64 (PI.f64)))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(neg.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/2 binary64)))

eval263.0ms (1.6%)

Memory
31.6MiB live, 415.8MiB allocated; 113ms collecting garbage
Compiler

Compiled 24 955 to 10 318 computations (58.7% saved)

prune339.0ms (2.1%)

Memory
-11.2MiB live, 259.8MiB allocated; 249ms collecting garbage
Pruning

94 alts after pruning (92 fresh and 2 done)

PrunedKeptTotal
New1 320301 350
Fresh106272
Picked415
Done011
Total1 334941 428
Accuracy
93.0%
Counts
1 428 → 94
Alt Table
Click to see full alt table
StatusAccuracyProgram
17.9%
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
42.9%
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
19.6%
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))))))) R)
70.7%
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
47.6%
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
43.9%
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
18.7%
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
20.7%
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))) R)
70.5%
(*.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
57.3%
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
92.5%
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
57.5%
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
70.7%
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
92.5%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
20.6%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 #s(approx (- (+ (neg phi1) (* (PI) 1/2)) phi2) (*.f64 #s(literal -1 binary64) phi2))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
92.4%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (fma.f64 (sin.f64 phi1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
92.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
43.1%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
24.9%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
46.8%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
70.8%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
92.5%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
45.4%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))))))) R)
54.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) #s(approx (cos lambda1) #s(literal 1 binary64))))))) R)
47.8%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) #s(approx (sin lambda1) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
55.4%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) #s(approx (sin lambda1) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
20.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (- lambda2 lambda1) (* (PI) 1/2)) (*.f64 #s(literal -1 binary64) lambda1)))))) R)
23.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (*.f64 #s(literal 2 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
43.5%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.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))))) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
30.6%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
28.4%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
51.9%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
22.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
40.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
58.5%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
44.4%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
48.2%
(*.f64 (acos.f64 (+.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)))))) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
56.8%
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
42.5%
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
29.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) R)
92.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
23.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
92.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
54.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
45.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) R)
52.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
54.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
34.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
23.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
24.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
32.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
12.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
47.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
20.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
54.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
47.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1)))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
29.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
30.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
25.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2))))) R)
20.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1)))))) R)
25.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
22.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
30.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
11.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
34.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
20.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
20.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
19.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1))) #s(literal 2 binary64)))) R)
19.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1))) #s(literal 2 binary64)))) R)
19.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
20.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
32.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
29.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
18.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
41.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
34.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
16.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
12.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
11.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
11.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
6.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
14.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
30.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
22.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
20.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 phi2)))))) R)
14.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (cos.f64 phi2)))))) R)
14.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi2)))))) R)
12.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))))) R)
20.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) R)
11.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) #s(approx (* (cos lambda1) (cos phi2)) (cos.f64 phi2)))))) R)
26.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
9.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
20.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) phi1))))))) R)
28.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) R)
Compiler

Compiled 5 676 to 5 278 computations (7% saved)

series338.0ms (2%)

Memory
33.9MiB live, 398.3MiB allocated; 116ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0165815538
Stop Event
iter-limit
Counts
73 → 365
Calls
Call 1
Inputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(*.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
#s(literal 1/2 binary64)
(PI.f64)
(cos.f64 phi1)
(cos.f64 phi2)
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(sin.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(cos.f64 lambda2)
(cos.f64 lambda1)
R
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2))))
#s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))
(+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2))
(*.f64 phi1 phi2)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))
(*.f64 #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 (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))
#s(literal 1 binary64)
(*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))
#s(literal -1/2 binary64)
(pow.f64 phi1 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))
(+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))
(cos.f64 (neg.f64 lambda2))
(neg.f64 lambda2)
(*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))
#s(literal -1 binary64)
(*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))
(sin.f64 (neg.f64 lambda2))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))
(sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(neg.f64 phi2)
(*.f64 (PI.f64) #s(literal 1/2 binary64))
Outputs
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (*.f64 R (acos.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))))
#s(approx R R)
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) R) (*.f64 R (acos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))))) R) (*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (acos.f64 (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 lambda1 (*.f64 (sin.f64 lambda2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))) (fma.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))) (*.f64 (sin.f64 lambda2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))) (fma.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (*.f64 (sin.f64 lambda2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))) (*.f64 (sin.f64 lambda2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))) (fma.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (*.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 lambda1 (*.f64 (sin.f64 lambda2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))) (*.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
#s(approx (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))) (*.f64 (sin.f64 lambda2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))) (*.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
#s(approx (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 lambda1 (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (*.f64 (sin.f64 lambda2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))) (*.f64 (sin.f64 lambda2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))) (*.f64 (cos.f64 lambda2) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (cos.f64 lambda2))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (+.f64 (sin.f64 lambda2) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2)))))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (+.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) 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 (* (cos lambda2) (cos lambda1)) (+.f64 (cos.f64 lambda2) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 lambda2)))))
#s(approx (* (cos lambda2) (cos lambda1)) (+.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 lambda2) (cos lambda1)) (+.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 (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 (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2)))) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2)))) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (neg.f64 lambda2))))))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.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 phi1) (cos.f64 phi2))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))))
#s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 phi2) (*.f64 phi1 (sin.f64 phi2))))
#s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 phi2)) (*.f64 phi1 (sin.f64 phi2)))))
#s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 phi2) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (cos.f64 phi2))))))))
#s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 phi2) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (pow.f64 lambda1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 phi2) (*.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 phi2)) (*.f64 #s(literal 1/24 binary64) (cos.f64 phi2)))))))))
#s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 phi2)))
#s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2))))
#s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 phi1 phi2 (*.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) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 phi1 phi2 (*.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) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (sin.f64 (neg.f64 lambda2))) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))))) (*.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2)))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (sin.f64 (neg.f64 lambda2))) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (neg.f64 lambda2))) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (sin.f64 (neg.f64 lambda2)))))))) (*.f64 (cos.f64 phi1) (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 (* -1 (* lambda1 (sin (neg lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))
#s(approx (* lambda1 (sin (neg lambda2))) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) (acos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 #s(literal -1/4 binary64) (*.f64 lambda1 (*.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (fma.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 lambda1 (fma.f64 #s(literal -1/4 binary64) (*.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 #s(literal 1/12 binary64) (*.f64 lambda1 (*.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 #s(literal -1/4 binary64) (*.f64 lambda1 (*.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))))))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 lambda1 (fma.f64 #s(literal -1/4 binary64) (*.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 #s(literal 1/12 binary64) (*.f64 lambda1 (*.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))))))))))
#s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2))
#s(approx (- lambda1 lambda2) (-.f64 lambda1 lambda2))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))))) (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal -1 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda1 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))) (*.f64 lambda1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))) (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
#s(approx (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
#s(approx (sin lambda1) (sin.f64 lambda1))
#s(approx (* (cos lambda2) (cos lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
#s(approx (cos lambda1) (cos.f64 lambda1))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2)) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))))
#s(approx (- lambda1 lambda2) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 lambda2 lambda1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi1) (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 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (+.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) R) (*.f64 R (acos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) (acos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))))
#s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))))) R) (*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))))) (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 #s(literal -1 binary64) lambda1)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 lambda2 (*.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))) (fma.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))) (*.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))) (fma.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (*.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))) (*.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))) (fma.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (*.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 lambda2 (*.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))) (*.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
#s(approx (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))) (*.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))) (*.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
#s(approx (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (*.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))) (*.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))) (*.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (+.f64 (sin.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1)))))))
#s(approx (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (+.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) lambda2)
#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 lambda2) (cos lambda1)) (+.f64 (cos.f64 lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (cos.f64 lambda1)))))
#s(approx (* (cos lambda2) (cos lambda1)) (+.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 lambda2) (cos lambda1)) (+.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 (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 (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos 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 phi1) (cos.f64 phi2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos 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 phi1) (cos.f64 phi2))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (cos.f64 phi1))) (*.f64 (cos.f64 phi1) (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (sin.f64 lambda1))))) (*.f64 (cos.f64 phi1) (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (cos.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 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2)))
#s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2)))))
#s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))))))
#s(approx (* -1 (* lambda1 (sin (neg lambda2)))) (*.f64 lambda1 lambda2))
#s(approx (* -1 (* lambda1 (sin (neg lambda2)))) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64)))))))
#s(approx (* -1 (* lambda1 (sin (neg lambda2)))) (*.f64 lambda2 (+.f64 lambda1 (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) lambda1 (*.f64 #s(literal 1/120 binary64) (*.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64)))))))))
#s(approx (* -1 (* lambda1 (sin (neg lambda2)))) (*.f64 lambda2 (+.f64 lambda1 (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) lambda1 (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))) (*.f64 #s(literal 1/120 binary64) lambda1))))))))
#s(approx (* lambda1 (sin (neg lambda2))) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 lambda2)))
#s(approx (* lambda1 (sin (neg lambda2))) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) lambda1 (*.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64)))))))
#s(approx (* lambda1 (sin (neg lambda2))) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) lambda1 (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) (*.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) lambda1))))))
#s(approx (* lambda1 (sin (neg lambda2))) (*.f64 lambda2 (fma.f64 #s(literal -1 binary64) lambda1 (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) lambda1 (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/120 binary64) lambda1 (*.f64 #s(literal 1/5040 binary64) (*.f64 lambda1 (pow.f64 lambda2 #s(literal 2 binary64)))))))))))
#s(approx (sin (neg lambda2)) (*.f64 lambda2 (-.f64 (*.f64 #s(literal 1/6 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1 binary64))))
#s(approx (sin (neg lambda2)) (*.f64 lambda2 (-.f64 (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/120 binary64) (pow.f64 lambda2 #s(literal 2 binary64))))) #s(literal 1 binary64))))
#s(approx (sin (neg lambda2)) (*.f64 lambda2 (-.f64 (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (+.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 lambda2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/5040 binary64) (pow.f64 lambda2 #s(literal 2 binary64))) #s(literal 1/120 binary64))))) #s(literal 1 binary64))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (*.f64 (sin.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (fma.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (fma.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 #s(literal -1/12 binary64) (*.f64 lambda2 (*.f64 (sin.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (*.f64 (sin.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))))))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 lambda2 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 lambda2 (fma.f64 #s(literal -1/4 binary64) (*.f64 (cos.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 #s(literal -1/12 binary64) (*.f64 lambda2 (*.f64 (sin.f64 lambda1) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))))))))))
#s(approx (- lambda1 lambda2) (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (fma.f64 lambda2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))) (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))))
#s(approx (sin lambda2) (sin.f64 lambda2))
#s(approx (sin (neg lambda2)) (sin.f64 (neg.f64 lambda2)))
#s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi1) (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 (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 (cos.f64 (*.f64 #s(literal -1 binary64) lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (*.f64 #s(literal -1 binary64) lambda2))))))
#s(approx (cos (neg lambda2)) (cos.f64 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (* -1 (* lambda1 (sin (neg lambda2)))) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (*.f64 #s(literal -1 binary64) lambda2)))))
#s(approx (* lambda1 (sin (neg lambda2))) (*.f64 lambda1 (sin.f64 (*.f64 #s(literal -1 binary64) lambda2))))
#s(approx (sin (neg lambda2)) (sin.f64 (*.f64 #s(literal -1 binary64) lambda2)))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) R) (*.f64 R (acos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) (acos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))))
#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 (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))))) R) (*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))))) (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (+.f64 lambda1 (*.f64 #s(literal -1 binary64) lambda2))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 phi1 (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi2) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (sin.f64 phi2)))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 phi2))))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi2) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 phi2))))))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.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)) (sin.f64 phi2)) (*.f64 #s(literal 1/120 binary64) (sin.f64 phi2)))))))))
#s(approx (sin phi1) phi1)
#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 (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 phi1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 phi1 (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (fma.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (fma.f64 phi1 (fma.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (* 1/2 (PI))) (cos phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (* (sin (* 1/2 (PI))) (cos phi1)) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (* 1/2 (PI))) (cos phi1)) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (* (sin (* 1/2 (PI))) (cos phi1)) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.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 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/24 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#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 (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2)) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2)) (*.f64 phi1 (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2)) (*.f64 phi1 (fma.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2)) (*.f64 phi1 (fma.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.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 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) (*.f64 phi1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) (*.f64 phi1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) (*.f64 phi1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) (*.f64 phi1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.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 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/120 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 (sin.f64 phi2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 (sin.f64 phi2)))))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
#s(approx (* phi1 phi2) (*.f64 phi1 phi2))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi1 #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 phi1 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))))))
#s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/24 binary64) (cos.f64 (-.f64 lambda1 lambda2)))))))))
#s(approx (* -1/2 (pow phi1 2)) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))
#s(approx (pow phi1 2) (pow.f64 phi1 #s(literal 2 binary64)))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (*.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (*.f64 phi1 (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi2) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/6 binary64) (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/6 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))))))))))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))) (*.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))))))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))) (*.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (*.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/6 binary64) (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/6 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))))))))))
#s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))
#s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))))
#s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))))))
#s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (fma.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))) (*.f64 phi1 (fma.f64 #s(literal 1/2 binary64) (*.f64 phi1 (fma.f64 #s(literal 1/6 binary64) (cos.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/6 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))))))))
#s(approx (sin (- (* 1/2 (PI)) 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 (- (* 1/2 (PI)) 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 (- (* 1/2 (PI)) 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 (- (* 1/2 (PI)) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (- (* 1/2 (PI)) phi1) (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 (sin.f64 phi2)))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.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)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))))))))
#s(approx (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))
#s(approx (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))))
#s(approx (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))))))
#s(approx (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)) (*.f64 (pow.f64 phi1 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 #s(literal 1/24 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2)))))))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
#s(approx (sin phi1) (sin.f64 phi1))
#s(approx (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (* (sin (* 1/2 (PI))) (cos phi1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (cos phi1) (cos.f64 phi1))
#s(approx (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
#s(approx (* (cos (* 1/2 (PI))) (sin phi1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))
#s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) phi1))))
#s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1))))
#s(approx (+ 1 (* -1/2 (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/2 binary64))))
#s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))))
#s(approx (sin (- (* 1/2 (PI)) phi1)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))
#s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal -1 binary64) phi1))
#s(approx (- (* 1/2 (PI)) phi1) (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi1)) #s(literal 1 binary64))))
#s(approx (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))
#s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) (sin.f64 phi2) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) phi1))))))
#s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (fma.f64 #s(literal -1 binary64) phi2 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda1) phi1))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) R) (*.f64 R (acos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (+.f64 phi2 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) (acos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (+.f64 phi2 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (+.f64 phi2 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (+.f64 phi2 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi2))))))
#s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 phi2 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi2)))))
#s(approx (sin (- (* 1/2 (PI)) phi1)) (sin.f64 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (- (* 1/2 (PI)) 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 phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 phi2 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 phi2 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi2 (sin.f64 phi1)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1)))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1))))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (sin.f64 phi1))))))))
#s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (sin.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 phi1)) (*.f64 #s(literal 1/120 binary64) (sin.f64 phi1)))))))))
#s(approx (sin phi2) phi2)
#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 (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
#s(approx (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.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)) (*.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))
#s(approx (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.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 (fma.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.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)) (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/720 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))))
#s(approx (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
#s(approx (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))))
#s(approx (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))))))
#s(approx (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/720 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.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)))))
#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 (* 1/2 (PI))) (sin phi1)) (cos phi2)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))
#s(approx (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))))))))
#s(approx (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2)) (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1) (*.f64 (pow.f64 phi2 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (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 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 (sin.f64 phi1)))))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (*.f64 #s(literal -1/6 binary64) (*.f64 phi2 (sin.f64 phi1)))))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))
#s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi2 (+.f64 phi1 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 (cos.f64 lambda1)))))))
#s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi2 (+.f64 phi1 (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda1) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi2))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (*.f64 phi2 (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal 1/6 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))))))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (fma.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (fma.f64 phi2 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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)) (fma.f64 #s(literal -1/6 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal 1/6 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))))))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))
#s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (+.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 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))))))
#s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 phi2 (fma.f64 #s(literal -1/2 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 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))))))))
#s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 phi2 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal -1 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))) (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (fma.f64 #s(literal -1/6 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (*.f64 #s(literal 1/6 binary64) (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (+.f64 (sin.f64 phi1) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 phi2 (fma.f64 #s(literal -1/6 binary64) (sin.f64 phi1) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2))))))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))) (fma.f64 #s(literal -1 binary64) (*.f64 phi2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))) (fma.f64 phi2 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))) (fma.f64 phi2 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal 1/6 binary64) (*.f64 phi2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda1 lambda2))))))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (fma.f64 #s(literal -1 binary64) (*.f64 phi2 (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (fma.f64 phi2 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (fma.f64 phi2 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/6 binary64) (*.f64 phi2 (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (+ (neg phi2) (* (PI) 1/2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1 binary64) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ (neg phi2) (* (PI) 1/2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 phi2 (fma.f64 #s(literal -1 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))
#s(approx (sin (+ (neg phi2) (* (PI) 1/2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 phi2 (fma.f64 #s(literal -1 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 phi2 (fma.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/6 binary64) (*.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))
#s(approx (+ (neg phi2) (* (PI) 1/2)) (fma.f64 #s(literal -1 binary64) phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (neg phi2) (*.f64 #s(literal -1 binary64) phi2))
#s(approx (sin phi2) (sin.f64 phi2))
#s(approx (cos phi2) (cos.f64 phi2))
#s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi2 (+.f64 phi1 (/.f64 (cos.f64 lambda1) phi2))))
#s(approx (+ (neg phi2) (* (PI) 1/2)) (*.f64 phi2 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi2)) #s(literal 1 binary64))))
#s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 #s(literal -1 binary64) (*.f64 phi2 (fma.f64 #s(literal -1 binary64) phi1 (*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 lambda1) phi2))))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) R) (*.f64 R (acos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 (*.f64 #s(literal -1 binary64) phi2)))) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) (acos.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 (*.f64 #s(literal -1 binary64) phi2)))) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 (*.f64 #s(literal -1 binary64) phi2)))) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 (*.f64 #s(literal -1 binary64) phi2)))) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1))))))
#s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 phi1 (*.f64 #s(literal -1 binary64) phi2)))) (sin.f64 (-.f64 (fma.f64 #s(literal -1 binary64) phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) phi1)))))
#s(approx (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))))) R) (*.f64 R (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (fma.f64 #s(literal -1 binary64) phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
#s(approx (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))))) (acos.f64 (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (fma.f64 #s(literal -1 binary64) phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (fma.f64 #s(literal -1 binary64) phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
#s(approx (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (fma.f64 #s(literal -1 binary64) phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (*.f64 (cos.f64 phi1) (sin.f64 (fma.f64 #s(literal -1 binary64) phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (+ (neg phi2) (* (PI) 1/2))) (sin.f64 (fma.f64 #s(literal -1 binary64) phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (+ (neg phi2) (* (PI) 1/2)) (*.f64 #s(literal -1 binary64) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) phi2))))))
Calls

15 calls:

TimeVariablePointExpression
46.0ms
phi2
@-inf
((* (acos (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (* (sin (* 1/2 (PI))) (cos phi1)) (sin (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (PI) (cos phi1) (cos phi2) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2)) (* (cos (* 1/2 (PI))) (sin phi1)) (cos (* 1/2 (PI))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (sin lambda2) lambda2 (sin lambda1) lambda1 (* (cos lambda2) (cos lambda1)) (cos lambda2) (cos lambda1) R (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+ (cos lambda1) (* phi1 phi2)) (* phi1 phi2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (cos (- lambda1 lambda2))) (cos phi1) (+ 1 (* -1/2 (pow phi1 2))) 1 (* -1/2 (pow phi1 2)) -1/2 (pow phi1 2) 2 (cos (- lambda1 lambda2)) (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (cos (neg lambda2)) (neg lambda2) (* -1 (* lambda1 (sin (neg lambda2)))) -1 (* lambda1 (sin (neg lambda2))) (sin (neg lambda2)) (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin (- (* 1/2 (PI)) phi1)) (- (* 1/2 (PI)) phi1) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))) (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (sin (+ (neg phi2) (* (PI) 1/2))) (+ (neg phi2) (* (PI) 1/2)) (neg phi2) (* (PI) 1/2))
43.0ms
phi1
@-inf
((* (acos (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (* (sin (* 1/2 (PI))) (cos phi1)) (sin (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (PI) (cos phi1) (cos phi2) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2)) (* (cos (* 1/2 (PI))) (sin phi1)) (cos (* 1/2 (PI))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (sin lambda2) lambda2 (sin lambda1) lambda1 (* (cos lambda2) (cos lambda1)) (cos lambda2) (cos lambda1) R (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+ (cos lambda1) (* phi1 phi2)) (* phi1 phi2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (cos (- lambda1 lambda2))) (cos phi1) (+ 1 (* -1/2 (pow phi1 2))) 1 (* -1/2 (pow phi1 2)) -1/2 (pow phi1 2) 2 (cos (- lambda1 lambda2)) (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (cos (neg lambda2)) (neg lambda2) (* -1 (* lambda1 (sin (neg lambda2)))) -1 (* lambda1 (sin (neg lambda2))) (sin (neg lambda2)) (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin (- (* 1/2 (PI)) phi1)) (- (* 1/2 (PI)) phi1) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))) (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (sin (+ (neg phi2) (* (PI) 1/2))) (+ (neg phi2) (* (PI) 1/2)) (neg phi2) (* (PI) 1/2))
30.0ms
lambda1
@inf
((* (acos (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (* (sin (* 1/2 (PI))) (cos phi1)) (sin (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (PI) (cos phi1) (cos phi2) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2)) (* (cos (* 1/2 (PI))) (sin phi1)) (cos (* 1/2 (PI))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (sin lambda2) lambda2 (sin lambda1) lambda1 (* (cos lambda2) (cos lambda1)) (cos lambda2) (cos lambda1) R (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+ (cos lambda1) (* phi1 phi2)) (* phi1 phi2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (cos (- lambda1 lambda2))) (cos phi1) (+ 1 (* -1/2 (pow phi1 2))) 1 (* -1/2 (pow phi1 2)) -1/2 (pow phi1 2) 2 (cos (- lambda1 lambda2)) (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (cos (neg lambda2)) (neg lambda2) (* -1 (* lambda1 (sin (neg lambda2)))) -1 (* lambda1 (sin (neg lambda2))) (sin (neg lambda2)) (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin (- (* 1/2 (PI)) phi1)) (- (* 1/2 (PI)) phi1) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))) (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (sin (+ (neg phi2) (* (PI) 1/2))) (+ (neg phi2) (* (PI) 1/2)) (neg phi2) (* (PI) 1/2))
26.0ms
phi1
@inf
((* (acos (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (* (sin (* 1/2 (PI))) (cos phi1)) (sin (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (PI) (cos phi1) (cos phi2) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2)) (* (cos (* 1/2 (PI))) (sin phi1)) (cos (* 1/2 (PI))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (sin lambda2) lambda2 (sin lambda1) lambda1 (* (cos lambda2) (cos lambda1)) (cos lambda2) (cos lambda1) R (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+ (cos lambda1) (* phi1 phi2)) (* phi1 phi2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (cos (- lambda1 lambda2))) (cos phi1) (+ 1 (* -1/2 (pow phi1 2))) 1 (* -1/2 (pow phi1 2)) -1/2 (pow phi1 2) 2 (cos (- lambda1 lambda2)) (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (cos (neg lambda2)) (neg lambda2) (* -1 (* lambda1 (sin (neg lambda2)))) -1 (* lambda1 (sin (neg lambda2))) (sin (neg lambda2)) (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin (- (* 1/2 (PI)) phi1)) (- (* 1/2 (PI)) phi1) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))) (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (sin (+ (neg phi2) (* (PI) 1/2))) (+ (neg phi2) (* (PI) 1/2)) (neg phi2) (* (PI) 1/2))
19.0ms
lambda2
@inf
((* (acos (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (* (sin phi1) (sin phi2)) (sin phi1) phi1 (sin phi2) phi2 (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (* (sin (* 1/2 (PI))) (cos phi1)) (sin (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (PI) (cos phi1) (cos phi2) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2)) (* (cos (* 1/2 (PI))) (sin phi1)) (cos (* 1/2 (PI))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))) (sin lambda2) lambda2 (sin lambda1) lambda1 (* (cos lambda2) (cos lambda1)) (cos lambda2) (cos lambda1) R (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+ (cos lambda1) (* phi1 phi2)) (* phi1 phi2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (* (cos phi1) (cos (- lambda1 lambda2))) (cos phi1) (+ 1 (* -1/2 (pow phi1 2))) 1 (* -1/2 (pow phi1 2)) -1/2 (pow phi1 2) 2 (cos (- lambda1 lambda2)) (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (cos (neg lambda2)) (neg lambda2) (* -1 (* lambda1 (sin (neg lambda2)))) -1 (* lambda1 (sin (neg lambda2))) (sin (neg lambda2)) (* (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2))) (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin (- (* 1/2 (PI)) phi1)) (- (* 1/2 (PI)) phi1) (cos (- lambda1 lambda2)) (- lambda1 lambda2) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2))) (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (sin (+ (neg phi2) (* (PI) 1/2))) (+ (neg phi2) (* (PI) 1/2)) (neg phi2) (* (PI) 1/2))

rewrite323.0ms (2%)

Memory
-52.1MiB live, 439.6MiB allocated; 102ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0991002
0160919
1708742
24307742
08230706
121034706
Stop Event
saturated
node-limit
iter-limit
Counts
73 → 968
Calls
Call 1
Inputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(*.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
#s(literal 1/2 binary64)
(PI.f64)
(cos.f64 phi1)
(cos.f64 phi2)
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(sin.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(cos.f64 lambda2)
(cos.f64 lambda1)
R
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2))))
#s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))
(+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2))
(*.f64 phi1 phi2)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))
(*.f64 #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 (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))
#s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))
#s(literal 1 binary64)
(*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64)))
#s(literal -1/2 binary64)
(pow.f64 phi1 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))
(+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))
(cos.f64 (neg.f64 lambda2))
(neg.f64 lambda2)
(*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))
#s(literal -1 binary64)
(*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))
(sin.f64 (neg.f64 lambda2))
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (-.f64 lambda1 lambda2)))
#s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)))
(sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))
(-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(neg.f64 phi2)
(*.f64 (PI.f64) #s(literal 1/2 binary64))
Outputs
(*.f64 (acos.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(*.f64 R (acos.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(neg.f64 (-.f64 (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(acos.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(neg.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (neg.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (neg.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (neg.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(*.f64 (-.f64 (neg.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1))) (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2))) #s(literal -1/2 binary64))
(*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64))
(*.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)) (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2))) #s(literal 1/2 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2) (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (-.f64 phi2 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2) (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (-.f64 phi2 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)) (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2))))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1))) (cos.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1)) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi2))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fabs.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (neg.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (fabs.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)) (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2))) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2)) #s(literal 1/2 binary64)) #s(literal 2 binary64) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1))) #s(literal 2 binary64))
(/.f64 (fma.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2)) #s(literal 2 binary64) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (fma.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (fabs.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 phi2) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) phi1)) (cos.f64 (-.f64 (fabs.f64 phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi2) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) phi1)) (cos.f64 (-.f64 (neg.f64 phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (fabs.f64 phi1))) (cos.f64 (-.f64 phi2 (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 phi1))) (cos.f64 (-.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 phi1) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) phi2)) (cos.f64 (-.f64 (fabs.f64 phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 phi2))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi2)) (cos.f64 (-.f64 (neg.f64 phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 phi2))) (cos.f64 (-.f64 phi1 (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) (cos.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (fabs.f64 phi1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 phi1))) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fabs.f64 phi2))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 phi2))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) phi2)) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) (fabs.f64 phi1))) (sin.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) (neg.f64 phi1))) (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) phi1)) (sin.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (fabs.f64 phi2))) (sin.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (neg.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1))) (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2))) #s(literal -2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)) (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2))) #s(literal 2 binary64))
(neg.f64 (*.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)) (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2))) #s(literal -1/2 binary64)))
(neg.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)) (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2))) #s(literal -2 binary64)))
(neg.f64 (/.f64 (-.f64 (neg.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1))) (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2))) #s(literal 2 binary64)))
(neg.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 phi1) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 phi1) (neg.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)) #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2)) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2)) #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (neg.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (cos.f64 phi2) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi2)))
(fma.f64 (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (cos.f64 phi2) (neg.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))))
(fma.f64 (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (neg.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi2)))
(fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (neg.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))))
(fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2)) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2)) #s(literal 1/2 binary64)) (/.f64 (neg.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1))) #s(literal 2 binary64)))
(-.f64 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2))))
(-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))) (cos.f64 phi2)))
(-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)) (neg.f64 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))))
(+.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))
(+.f64 (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))))
(*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))
(*.f64 (cos.f64 phi1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1))) (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 phi1) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (fabs.f64 phi1))) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 2 binary64))
(+.f64 (/.f64 (cos.f64 phi1) #s(literal 2 binary64)) (/.f64 (cos.f64 phi1) #s(literal 2 binary64)))
(sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(*.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(*.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(/.f64 (*.f64 (PI.f64) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 2 binary64))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(PI.f64)
(neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))))
(neg.f64 (sin.f64 (-.f64 phi1 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(sin.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))
(sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1))
(fma.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi1) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)))
(fma.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(fma.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))
(fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1)) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))
(fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)))
(-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(-.f64 (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(-.f64 (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))
(cos.f64 (neg.f64 (fabs.f64 phi1)))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(cos.f64 (fabs.f64 (fabs.f64 phi1)))
(cos.f64 (fabs.f64 phi1))
(cos.f64 (neg.f64 phi1))
(cos.f64 phi1)
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(+.f64 (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))
(sin.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))
(sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2))
(fma.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 phi2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(fma.f64 (sin.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(-.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(-.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (neg.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(cos.f64 (neg.f64 (fabs.f64 phi2)))
(cos.f64 (neg.f64 (neg.f64 phi2)))
(cos.f64 (fabs.f64 (fabs.f64 phi2)))
(cos.f64 (fabs.f64 phi2))
(cos.f64 (neg.f64 phi2))
(cos.f64 phi2)
(+.f64 (*.f64 (sin.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal -1/2 binary64) (PI.f64) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1)) (cos.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (PI.f64) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (fabs.f64 (PI.f64)) #s(literal 1/2 binary64) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1)) (cos.f64 (+.f64 (fma.f64 (fabs.f64 (PI.f64)) #s(literal 1/2 binary64) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (PI.f64) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 phi1 (fma.f64 #s(literal -1/2 binary64) (PI.f64) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (fma.f64 (fabs.f64 (PI.f64)) #s(literal 1/2 binary64) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 phi1 (fma.f64 (fabs.f64 (PI.f64)) #s(literal 1/2 binary64) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (neg.f64 (*.f64 (fabs.f64 (PI.f64)) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 phi1 (neg.f64 (*.f64 (fabs.f64 (PI.f64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (fabs.f64 (*.f64 (fabs.f64 (PI.f64)) #s(literal 1/2 binary64))))) (sin.f64 (+.f64 phi1 (fabs.f64 (*.f64 (fabs.f64 (PI.f64)) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1)) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 phi1 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 phi1) (sin.f64 (-.f64 phi1 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (*.f64 (fabs.f64 (PI.f64)) #s(literal 1/2 binary64)))) (sin.f64 (+.f64 phi1 (*.f64 (fabs.f64 (PI.f64)) #s(literal 1/2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 phi1 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 phi1)) #s(literal 2 binary64))
(sin.f64 (fma.f64 #s(literal -1/2 binary64) (PI.f64) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 (fabs.f64 (PI.f64)) #s(literal 1/2 binary64) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(cos.f64 (neg.f64 (*.f64 (fabs.f64 (PI.f64)) #s(literal 1/2 binary64))))
(cos.f64 (fabs.f64 (*.f64 (fabs.f64 (PI.f64)) #s(literal 1/2 binary64))))
(cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(cos.f64 (*.f64 (fabs.f64 (PI.f64)) #s(literal 1/2 binary64)))
(cos.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 (*.f64 (PI.f64) #s(literal 1/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 lambda1) (cos.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 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) #s(literal 4 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))) #s(literal 4 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 (+.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 (-.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))))) #s(literal 4 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))))) #s(literal 4 binary64))
(neg.f64 (-.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (neg.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (neg.f64 (neg.f64 (*.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 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (neg.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.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 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(cos.f64 (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (fabs.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (neg.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(+.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)))
(sin.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(*.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 lambda2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 lambda2) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 lambda2)))) (cos.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))) (cos.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 lambda2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 lambda2) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 lambda2)))) (cos.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))) (cos.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) (+.f64 (fabs.f64 lambda2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) (+.f64 (fabs.f64 lambda2) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 lambda2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 lambda2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 lambda2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 lambda2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 lambda2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1))) (cos.f64 (+.f64 (+.f64 (fabs.f64 lambda2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 lambda2)) (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 lambda2)) (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 lambda2)) (+.f64 (fabs.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 lambda2)) (+.f64 (fabs.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) (+.f64 (fabs.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) (+.f64 (fabs.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 lambda2)))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 lambda2)))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 lambda2))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 lambda2))) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) lambda2)) (sin.f64 (+.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 lambda2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 lambda2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 lambda2))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 lambda2))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) lambda2)) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) (neg.f64 (fabs.f64 lambda2)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) (neg.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) (fabs.f64 (fabs.f64 lambda2)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) (fabs.f64 (fabs.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 lambda1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 lambda1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 lambda1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 lambda1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 lambda1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 lambda2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) lambda1)) (sin.f64 (+.f64 (+.f64 (fabs.f64 lambda2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 lambda2)) (neg.f64 (neg.f64 lambda1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 lambda2)) (neg.f64 (neg.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 lambda2)) (neg.f64 (fabs.f64 lambda1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 lambda2)) (neg.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 lambda2)) (fabs.f64 (fabs.f64 lambda1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 lambda2)) (fabs.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) (neg.f64 (neg.f64 lambda1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) (neg.f64 (neg.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) (neg.f64 (fabs.f64 lambda1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) (neg.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) (fabs.f64 (fabs.f64 lambda1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) (fabs.f64 (fabs.f64 lambda1))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #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 lambda1)) (cos.f64 (-.f64 (neg.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 (fabs.f64 lambda1) lambda2)) (cos.f64 (-.f64 (fabs.f64 lambda1) lambda2))) #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 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 (neg.f64 lambda2)))) #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 (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) lambda1)) (cos.f64 (-.f64 (fabs.f64 lambda2) 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 (neg.f64 lambda2) (fabs.f64 lambda1))) (cos.f64 (-.f64 (neg.f64 lambda2) (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1))) #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 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 lambda2)))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 lambda2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 lambda2)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 lambda2)) (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) (fabs.f64 lambda2))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) (fabs.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) (neg.f64 lambda2))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) (neg.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2)) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1) lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 lambda2)) (neg.f64 lambda1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 lambda2)) (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 lambda2)) (fabs.f64 lambda1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 lambda2)) (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 lambda2)) lambda1)) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 lambda2)) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) (neg.f64 lambda1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) (neg.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) (fabs.f64 lambda1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) (fabs.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1)) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2) lambda1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #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)))
(sin.f64 (+.f64 (fabs.f64 lambda2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 lambda2)))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 lambda2) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(cos.f64 (neg.f64 (fabs.f64 lambda2)))
(cos.f64 (fabs.f64 (fabs.f64 lambda2)))
(cos.f64 (fabs.f64 lambda2))
(cos.f64 (neg.f64 lambda2))
(cos.f64 lambda2)
(+.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 lambda2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 lambda2) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 lambda2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1))
(fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(cos.f64 (neg.f64 (neg.f64 lambda1)))
(cos.f64 (neg.f64 (fabs.f64 lambda1)))
(cos.f64 (fabs.f64 (fabs.f64 lambda1)))
(cos.f64 (neg.f64 lambda1))
(cos.f64 (fabs.f64 lambda1))
(cos.f64 lambda1)
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
R
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
(*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))))
(neg.f64 (-.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))
#s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))
#s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))
(neg.f64 (-.f64 (*.f64 (neg.f64 phi2) phi1) (cos.f64 lambda1)))
(fma.f64 phi2 phi1 (cos.f64 lambda1))
(fma.f64 phi1 phi2 (cos.f64 lambda1))
(-.f64 (*.f64 phi2 phi1) (neg.f64 (cos.f64 lambda1)))
(-.f64 (cos.f64 lambda1) (*.f64 (neg.f64 phi2) phi1))
(+.f64 (*.f64 phi2 phi1) (cos.f64 lambda1))
(+.f64 (cos.f64 lambda1) (*.f64 (neg.f64 (neg.f64 phi1)) phi2))
(+.f64 (cos.f64 lambda1) (neg.f64 (*.f64 (neg.f64 phi2) phi1)))
(+.f64 (cos.f64 lambda1) (*.f64 phi2 phi1))
(*.f64 phi2 phi1)
(*.f64 phi1 phi2)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 R (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))
(neg.f64 (-.f64 (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))
(*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))
(*.f64 #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))))
#s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(neg.f64 (-.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64))
(fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64))
(fma.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)) #s(literal 1 binary64))
(-.f64 (*.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64)) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 1/2 binary64))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64)))
#s(literal 1 binary64)
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi1)
(*.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64))
(*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))
(*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))
#s(literal -1/2 binary64)
(*.f64 (fabs.f64 phi1) (fabs.f64 phi1))
(*.f64 (neg.f64 phi1) (neg.f64 phi1))
(*.f64 phi1 phi1)
(pow.f64 phi1 #s(literal 2 binary64))
#s(literal 2 binary64)
#s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1))))
(neg.f64 (-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2))
(fma.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2))
(fma.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) #s(literal -1 binary64) (cos.f64 lambda2))
(fma.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda2))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1) (cos.f64 lambda2))
(fma.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) (cos.f64 lambda2))
(fma.f64 lambda1 (*.f64 (neg.f64 (sin.f64 lambda2)) #s(literal -1 binary64)) (cos.f64 lambda2))
(fma.f64 lambda1 (neg.f64 (neg.f64 (sin.f64 lambda2))) (cos.f64 lambda2))
(-.f64 (*.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (neg.f64 (cos.f64 lambda2)))
(-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))
(+.f64 (*.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 lambda2))
(+.f64 (cos.f64 lambda2) (*.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(sin.f64 (+.f64 (fabs.f64 lambda2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 lambda2)))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 lambda2) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(cos.f64 (neg.f64 (fabs.f64 lambda2)))
(cos.f64 (fabs.f64 (fabs.f64 lambda2)))
(cos.f64 (fabs.f64 lambda2))
(cos.f64 (neg.f64 lambda2))
(cos.f64 lambda2)
(+.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 lambda2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 lambda2) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 lambda2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(neg.f64 lambda2)
(*.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 lambda2))) lambda1)
(*.f64 (neg.f64 (neg.f64 (sin.f64 lambda2))) lambda1)
(*.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) #s(literal -1 binary64))
(*.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (neg.f64 lambda1))
(*.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))
(*.f64 lambda1 (*.f64 (neg.f64 (sin.f64 lambda2)) #s(literal -1 binary64)))
(*.f64 lambda1 (neg.f64 (neg.f64 (sin.f64 lambda2))))
(neg.f64 (*.f64 (neg.f64 lambda1) (sin.f64 lambda2)))
(neg.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))
#s(literal -1 binary64)
(*.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (sin.f64 lambda2))) lambda1)
(*.f64 (*.f64 #s(literal 1 binary64) lambda1) (neg.f64 (sin.f64 lambda2)))
(*.f64 (neg.f64 (neg.f64 lambda1)) (neg.f64 (sin.f64 lambda2)))
(*.f64 (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)) #s(literal 1 binary64))
(*.f64 (neg.f64 lambda1) (neg.f64 (neg.f64 (sin.f64 lambda2))))
(*.f64 (*.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal -1 binary64))
(*.f64 (neg.f64 (sin.f64 lambda2)) lambda1)
(*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))
(*.f64 lambda1 (neg.f64 (sin.f64 lambda2)))
(neg.f64 (*.f64 (sin.f64 lambda2) lambda1))
(neg.f64 (*.f64 lambda1 (sin.f64 lambda2)))
(neg.f64 (*.f64 (neg.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(neg.f64 (sin.f64 lambda2))
(sin.f64 (+.f64 lambda2 (PI.f64)))
(sin.f64 (neg.f64 lambda2))
(cos.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda2))
(*.f64 (acos.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(*.f64 R (acos.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(neg.f64 (-.f64 (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(acos.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))) #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(neg.f64 (-.f64 (*.f64 (neg.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (neg.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1)))) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (neg.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (neg.f64 (neg.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1)))) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (neg.f64 (*.f64 (neg.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (neg.f64 (neg.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1)))) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (neg.f64 (*.f64 (neg.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (neg.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1)))) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (neg.f64 (*.f64 (neg.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1)))
(*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))
(fma.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))
(+.f64 (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(+.f64 (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))
#s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))
(neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))))
(neg.f64 (sin.f64 (-.f64 phi1 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(sin.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))
(sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1))
(fma.f64 (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi1) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)))
(fma.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(fma.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))
(fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1)) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))
(fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (neg.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)))
(-.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(-.f64 (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(-.f64 (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))
(cos.f64 (neg.f64 (fabs.f64 phi1)))
(cos.f64 (neg.f64 (neg.f64 phi1)))
(cos.f64 (fabs.f64 (fabs.f64 phi1)))
(cos.f64 (fabs.f64 phi1))
(cos.f64 (neg.f64 phi1))
(cos.f64 phi1)
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(+.f64 (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))
(neg.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (neg.f64 phi1)))
(neg.f64 (-.f64 phi1 (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (neg.f64 phi1))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 phi1))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 phi1))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 phi1))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi1))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (neg.f64 phi1)))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1)
(-.f64 (neg.f64 phi1) (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 phi1))
(+.f64 (neg.f64 phi1) (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))
(+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/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 lambda1) (cos.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 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) #s(literal 4 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))) #s(literal 4 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 (+.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 (-.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))))) #s(literal 4 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))))) #s(literal 4 binary64))
(neg.f64 (-.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 (-.f64 lambda2 lambda1)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (neg.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (neg.f64 (neg.f64 (*.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 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (neg.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.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 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(cos.f64 (neg.f64 (fabs.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (fabs.f64 (fabs.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (fabs.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (neg.f64 (neg.f64 (cos.f64 lambda2))) (cos.f64 lambda1)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (neg.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(+.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)))
(neg.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda1 lambda2)
(+.f64 (neg.f64 lambda2) lambda1)
(+.f64 lambda1 (neg.f64 lambda2))
(*.f64 (acos.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(*.f64 R (acos.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(neg.f64 (-.f64 (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(acos.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(neg.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (sin.f64 lambda1) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (neg.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (neg.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(-.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1)))
(-.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (neg.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))) (cos.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)))
(+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(*.f64 (-.f64 (neg.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1))) (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2))) #s(literal -1/2 binary64))
(*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64))
(*.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)) (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2))) #s(literal 1/2 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2) (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (-.f64 phi2 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2) (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (-.f64 phi2 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1))) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)) (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2))))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1))) (cos.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2))) (cos.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2))) (cos.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1)) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) (neg.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) (neg.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) (fabs.f64 (fabs.f64 phi1)))) (sin.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) (fabs.f64 (fabs.f64 phi1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi2))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi2))) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (fabs.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (neg.f64 phi2)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 (neg.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fabs.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (neg.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (neg.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (fabs.f64 (fabs.f64 phi2)))) (sin.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (fabs.f64 (fabs.f64 phi2))))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)) (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2))) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (fma.f64 (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2)) #s(literal 1/2 binary64)) #s(literal 2 binary64) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1))) #s(literal 2 binary64))
(/.f64 (fma.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2)) #s(literal 2 binary64) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (fma.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (fabs.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 phi2) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) (neg.f64 phi1))) (cos.f64 (-.f64 (fabs.f64 phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi2) phi1)) (cos.f64 (-.f64 (fabs.f64 phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (fabs.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi2) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) (neg.f64 phi1))) (cos.f64 (-.f64 (neg.f64 phi2) (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi2) phi1)) (cos.f64 (-.f64 (neg.f64 phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (fabs.f64 phi1))) (cos.f64 (-.f64 phi2 (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 (neg.f64 phi1))) (cos.f64 (-.f64 phi2 (neg.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (fabs.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 phi1) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) (neg.f64 phi2))) (cos.f64 (-.f64 (fabs.f64 phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (fabs.f64 phi1) phi2)) (cos.f64 (-.f64 (fabs.f64 phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (fabs.f64 phi2))) (cos.f64 (-.f64 (neg.f64 phi1) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) (neg.f64 phi2))) (cos.f64 (-.f64 (neg.f64 phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 phi1) phi2)) (cos.f64 (-.f64 (neg.f64 phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (fabs.f64 phi2))) (cos.f64 (-.f64 phi1 (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1))) (cos.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2))) (cos.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) (cos.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (fabs.f64 phi1))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 phi1))) (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fabs.f64 phi2))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 phi2))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) (neg.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) phi2)) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) (fabs.f64 phi1))) (sin.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) (fabs.f64 phi1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) (neg.f64 phi1))) (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) phi1)) (sin.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (fabs.f64 phi2))) (sin.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) (fabs.f64 phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (neg.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1))) (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2))) #s(literal -2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)) (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2))) #s(literal 2 binary64))
(neg.f64 (*.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)) (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2))) #s(literal -1/2 binary64)))
(neg.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)) (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2))) #s(literal -2 binary64)))
(neg.f64 (/.f64 (-.f64 (neg.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1))) (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2))) #s(literal 2 binary64)))
(neg.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 phi1) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 phi1) (neg.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)) #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2)) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2)) #s(literal 1/2 binary64) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (neg.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))))
(fma.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (cos.f64 phi2) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi2)))
(fma.f64 (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (cos.f64 phi2) (neg.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))))
(fma.f64 (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (neg.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))))
(fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))))
(fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi2)))
(fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (neg.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))))
(fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2)) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2)) #s(literal 1/2 binary64)) (/.f64 (neg.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1))) #s(literal 2 binary64)))
(-.f64 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2))))
(-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))) (cos.f64 phi2)))
(-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)) (neg.f64 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))))
(+.f64 (/.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))
(+.f64 (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (sin.f64 (-.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi1) phi2)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) phi1)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))))) (cos.f64 phi2)))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (cos.f64 phi1) (cos.f64 phi1)) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))
(sin.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2))
(fma.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 phi2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(fma.f64 (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(fma.f64 (sin.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(-.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(-.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (neg.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(-.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(cos.f64 (neg.f64 (fabs.f64 phi2)))
(cos.f64 (neg.f64 (neg.f64 phi2)))
(cos.f64 (fabs.f64 (fabs.f64 phi2)))
(cos.f64 (fabs.f64 phi2))
(cos.f64 (neg.f64 phi2))
(cos.f64 phi2)
(+.f64 (*.f64 (sin.f64 phi2) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)))))
(neg.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)) (neg.f64 phi2)))
(neg.f64 (-.f64 phi2 (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (neg.f64 phi2))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 phi2))
(fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 phi2))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 phi2))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 phi2))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 (neg.f64 phi2)))
(-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) phi2)
(-.f64 (neg.f64 phi2) (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (neg.f64 phi2))
(+.f64 (neg.f64 phi2) (*.f64 (neg.f64 (neg.f64 (PI.f64))) #s(literal 1/2 binary64)))
(+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64)))
(neg.f64 phi2)
(*.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(*.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(*.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(/.f64 (*.f64 (PI.f64) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (PI.f64)) #s(literal 2 binary64))
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64)))
(log.f64 (pow.f64 (exp.f64 (PI.f64)) #s(literal 1/2 binary64)))

eval177.0ms (1.1%)

Memory
12.5MiB live, 436.4MiB allocated; 49ms collecting garbage
Compiler

Compiled 23 143 to 7 548 computations (67.4% saved)

prune326.0ms (2%)

Memory
-19.3MiB live, 460.8MiB allocated; 41ms collecting garbage
Pruning

111 alts after pruning (109 fresh and 2 done)

PrunedKeptTotal
New1 062261 088
Fresh48387
Picked505
Done022
Total1 0711111 182
Accuracy
93.0%
Counts
1 182 → 111
Alt Table
Click to see full alt table
StatusAccuracyProgram
17.9%
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
10.8%
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
8.4%
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))))) R)
42.9%
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
70.7%
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
9.5%
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))) R)
47.6%
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
43.9%
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
18.7%
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
20.7%
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))) R)
70.5%
(*.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
43.7%
(*.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
57.3%
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
43.5%
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
92.5%
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
70.7%
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
43.9%
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
46.0%
(*.f64 (acos.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
20.6%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 #s(approx (- (+ (neg phi1) (* (PI) 1/2)) phi2) (*.f64 #s(literal -1 binary64) phi2))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
92.4%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (fma.f64 (sin.f64 phi1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
92.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
43.1%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
24.9%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
70.8%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
92.5%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
45.4%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))))))) R)
54.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) #s(approx (cos lambda1) #s(literal 1 binary64))))))) R)
47.8%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) #s(approx (sin lambda1) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
55.4%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) #s(approx (sin lambda1) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
20.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (- lambda2 lambda1) (* (PI) 1/2)) (*.f64 #s(literal -1 binary64) lambda1)))))) R)
23.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (*.f64 #s(literal 2 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
43.5%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.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))))) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
30.6%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
24.2%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2)))))) R)
28.4%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi1)) #s(literal 1 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
26.1%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
19.2%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal -1 binary64) phi1)))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
51.9%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
22.7%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
40.3%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
58.5%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
44.4%
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
48.2%
(*.f64 (acos.f64 (+.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)))))) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
56.8%
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
42.5%
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
29.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) R)
47.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
92.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
23.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
38.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
29.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) R)
92.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
54.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
45.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) R)
52.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
54.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
34.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
23.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
24.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
32.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
12.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
47.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
20.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
54.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
47.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1)))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
29.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
30.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
25.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2))))) R)
20.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1)))))) R)
25.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
22.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
30.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
11.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
34.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
20.4%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
20.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
19.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1))) #s(literal 2 binary64)))) R)
19.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1))) #s(literal 2 binary64)))) R)
19.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
20.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
32.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
29.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
18.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
41.0%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
34.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
11.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
16.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
12.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
11.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
6.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
14.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
1.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
1.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
11.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2)) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1)))))))) R)
30.8%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
22.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
14.1%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (cos.f64 phi2)))))) R)
14.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi2)))))) R)
12.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))))) R)
20.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) R)
11.2%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) #s(approx (* (cos lambda1) (cos phi2)) (cos.f64 phi2)))))) R)
26.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
9.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
9.5%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 phi1 phi2)))))) R)
6.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)) (*.f64 phi1 phi2)))))) R)
6.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 phi1 phi2)))))) R)
2.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
1.9%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
9.7%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi2 (+.f64 phi1 (/.f64 (cos.f64 lambda1) phi2)))))))) R)
9.6%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
28.3%
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) R)
Compiler

Compiled 6 182 to 4 422 computations (28.5% saved)

regimes618.0ms (3.7%)

Memory
75.1MiB live, 893.1MiB allocated; 146ms collecting garbage
Counts
163 → 1
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi2 (+.f64 phi1 (/.f64 (cos.f64 lambda1) phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)) (*.f64 phi1 phi2)))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) #s(approx (* (cos lambda1) (cos phi2)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2)) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi2)))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal -1 binary64) phi1)))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (*.f64 #s(literal 2 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi1)) #s(literal 1 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.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))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (- lambda2 lambda1) (* (PI) 1/2)) (*.f64 #s(literal -1 binary64) lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 #s(approx (- (+ (neg phi1) (* (PI) 1/2)) phi2) (*.f64 #s(literal -1 binary64) phi2))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #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)))))) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) #s(approx (cos lambda1) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) #s(approx (sin lambda1) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.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))))) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) #s(approx (sin lambda1) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.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)))))) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (neg.f64 (sin.f64 phi1)))) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda1) (cos.f64 (+.f64 (neg.f64 lambda2) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (+ (* (* (sin (* 1/2 (PI))) (cos phi1)) (cos phi2)) (* (* (cos (* 1/2 (PI))) (sin phi1)) (cos phi2))) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 lambda1) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (* (sin phi1) (cos (* -1/2 (PI)))) (* (cos phi1) (sin (* 1/2 (PI))))) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 phi2) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (fma.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (sin.f64 phi1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (fma.f64 (sin.f64 phi1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 phi1)) (cos.f64 phi2))) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (fma.f64 (sin.f64 phi1) (cos.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
Outputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
Calls

10 calls:

108.0ms
(cos.f64 (-.f64 lambda1 lambda2))
88.0ms
lambda2
65.0ms
phi2
61.0ms
phi1
59.0ms
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Results
AccuracySegmentsBranch
92.5%1(-.f64 lambda1 lambda2)
92.5%1(cos.f64 (-.f64 lambda1 lambda2))
92.5%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
92.5%1(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
92.5%1(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
92.5%1R
92.5%1lambda1
92.5%1lambda2
92.5%1phi1
92.5%1phi2
Compiler

Compiled 58 to 86 computations (-48.3% saved)

regimes575.0ms (3.5%)

Memory
2.0MiB live, 1 071.2MiB allocated; 173ms collecting garbage
Counts
150 → 1
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi2 (+.f64 phi1 (/.f64 (cos.f64 lambda1) phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)) (*.f64 phi1 phi2)))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) #s(approx (* (cos lambda1) (cos phi2)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2)) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi2)))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal -1 binary64) phi1)))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (*.f64 #s(literal 2 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi1)) #s(literal 1 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.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))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (- lambda2 lambda1) (* (PI) 1/2)) (*.f64 #s(literal -1 binary64) lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 #s(approx (- (+ (neg phi1) (* (PI) 1/2)) phi2) (*.f64 #s(literal -1 binary64) phi2))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #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)))))) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) #s(approx (cos lambda1) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) #s(approx (sin lambda1) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.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))))) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) #s(approx (sin lambda1) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.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)))))) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
Outputs
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
Calls

10 calls:

116.0ms
R
76.0ms
lambda2
62.0ms
phi2
49.0ms
(cos.f64 (-.f64 lambda1 lambda2))
46.0ms
lambda1
Results
AccuracySegmentsBranch
92.5%1phi2
92.5%1R
92.5%1lambda2
92.5%1phi1
92.5%1(-.f64 lambda1 lambda2)
92.5%1(cos.f64 (-.f64 lambda1 lambda2))
92.5%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
92.5%1(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
92.5%1(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
92.5%1lambda1
Compiler

Compiled 58 to 86 computations (-48.3% saved)

regimes611.0ms (3.7%)

Memory
45.4MiB live, 776.6MiB allocated; 218ms collecting garbage
Counts
149 → 1
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi2 (+.f64 phi1 (/.f64 (cos.f64 lambda1) phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)) (*.f64 phi1 phi2)))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) #s(approx (* (cos lambda1) (cos phi2)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2)) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi2)))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal -1 binary64) phi1)))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (*.f64 #s(literal 2 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi1)) #s(literal 1 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.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))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (- lambda2 lambda1) (* (PI) 1/2)) (*.f64 #s(literal -1 binary64) lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 #s(approx (- (+ (neg phi1) (* (PI) 1/2)) phi2) (*.f64 #s(literal -1 binary64) phi2))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #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)))))) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) #s(approx (cos lambda1) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) #s(approx (sin lambda1) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.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))))) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) #s(approx (sin lambda1) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.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)))))) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
Calls

10 calls:

148.0ms
(-.f64 lambda1 lambda2)
82.0ms
phi2
78.0ms
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
46.0ms
(cos.f64 (-.f64 lambda1 lambda2))
44.0ms
R
Results
AccuracySegmentsBranch
92.5%1lambda2
92.5%1phi1
92.5%1phi2
92.5%1R
92.5%1(-.f64 lambda1 lambda2)
92.5%1(cos.f64 (-.f64 lambda1 lambda2))
92.5%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
92.5%1(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
92.5%1(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
92.5%1lambda1
Compiler

Compiled 58 to 86 computations (-48.3% saved)

regimes708.0ms (4.3%)

Memory
73.2MiB live, 872.8MiB allocated; 360ms collecting garbage
Counts
148 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi2 (+.f64 phi1 (/.f64 (cos.f64 lambda1) phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)) (*.f64 phi1 phi2)))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) #s(approx (* (cos lambda1) (cos phi2)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2)) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi2)))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal -1 binary64) phi1)))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (*.f64 #s(literal 2 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi1)) #s(literal 1 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.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))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (- lambda2 lambda1) (* (PI) 1/2)) (*.f64 #s(literal -1 binary64) lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 #s(approx (- (+ (neg phi1) (* (PI) 1/2)) phi2) (*.f64 #s(literal -1 binary64) phi2))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #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)))))) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) #s(approx (cos lambda1) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) #s(approx (sin lambda1) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.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))))) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) #s(approx (sin lambda1) (*.f64 lambda1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (pow.f64 lambda1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.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)))))) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
Outputs
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.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))))) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
Calls

10 calls:

123.0ms
(cos.f64 (-.f64 lambda1 lambda2))
112.0ms
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
72.0ms
phi1
68.0ms
phi2
65.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
Results
AccuracySegmentsBranch
77.7%3lambda2
82.3%3phi1
70.8%1R
81.5%3phi2
75.3%2(-.f64 lambda1 lambda2)
73.0%2(cos.f64 (-.f64 lambda1 lambda2))
70.8%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
70.8%1(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
70.8%1(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
77.0%3lambda1
Compiler

Compiled 58 to 86 computations (-48.3% saved)

regimes92.0ms (0.6%)

Memory
-53.6MiB live, 95.6MiB allocated; 31ms collecting garbage
Counts
144 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi2 (+.f64 phi1 (/.f64 (cos.f64 lambda1) phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)) (*.f64 phi1 phi2)))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) #s(approx (* (cos lambda1) (cos phi2)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2)) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi2)))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal -1 binary64) phi1)))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (*.f64 #s(literal 2 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi1)) #s(literal 1 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.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))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (- lambda2 lambda1) (* (PI) 1/2)) (*.f64 #s(literal -1 binary64) lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 #s(approx (- (+ (neg phi1) (* (PI) 1/2)) phi2) (*.f64 #s(literal -1 binary64) phi2))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #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)))))) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) #s(approx (cos lambda1) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) #s(approx (sin lambda1) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))))))) R)
Outputs
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
Calls

1 calls:

85.0ms
phi1
Results
AccuracySegmentsBranch
82.3%3phi1
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes88.0ms (0.5%)

Memory
10.8MiB live, 100.1MiB allocated; 7ms collecting garbage
Counts
141 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi2 (+.f64 phi1 (/.f64 (cos.f64 lambda1) phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)) (*.f64 phi1 phi2)))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) #s(approx (* (cos lambda1) (cos phi2)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2)) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi2)))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal -1 binary64) phi1)))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (*.f64 #s(literal 2 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi1)) #s(literal 1 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.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))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (- lambda2 lambda1) (* (PI) 1/2)) (*.f64 #s(literal -1 binary64) lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 #s(approx (- (+ (neg phi1) (* (PI) 1/2)) phi2) (*.f64 #s(literal -1 binary64) phi2))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #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)))))) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) #s(approx (cos lambda1) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) #s(approx (sin lambda1) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
Outputs
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
Calls

1 calls:

81.0ms
phi1
Results
AccuracySegmentsBranch
82.2%3phi1
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes49.0ms (0.3%)

Memory
15.1MiB live, 115.1MiB allocated; 16ms collecting garbage
Counts
137 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi2 (+.f64 phi1 (/.f64 (cos.f64 lambda1) phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)) (*.f64 phi1 phi2)))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) #s(approx (* (cos lambda1) (cos phi2)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2)) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi2)))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal -1 binary64) phi1)))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (*.f64 #s(literal 2 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi1)) #s(literal 1 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.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))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (- lambda2 lambda1) (* (PI) 1/2)) (*.f64 #s(literal -1 binary64) lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 #s(approx (- (+ (neg phi1) (* (PI) 1/2)) phi2) (*.f64 #s(literal -1 binary64) phi2))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #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)))))) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))))))) R)
Outputs
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
Calls

1 calls:

42.0ms
phi1
Results
AccuracySegmentsBranch
82.1%3phi1
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes50.0ms (0.3%)

Memory
-36.9MiB live, 103.7MiB allocated; 20ms collecting garbage
Counts
132 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi2 (+.f64 phi1 (/.f64 (cos.f64 lambda1) phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)) (*.f64 phi1 phi2)))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) #s(approx (* (cos lambda1) (cos phi2)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2)) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi2)))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal -1 binary64) phi1)))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (*.f64 #s(literal 2 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi1)) #s(literal 1 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.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))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 #s(approx (+ (- lambda2 lambda1) (* (PI) 1/2)) (*.f64 #s(literal -1 binary64) lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) #s(literal 1/2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (+.f64 (sin.f64 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda2 lambda1)) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 phi2 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 #s(approx (- (+ (neg phi1) (* (PI) 1/2)) phi2) (*.f64 #s(literal -1 binary64) phi2))) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi1) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi2))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1)) (sin.f64 (+.f64 (+.f64 (neg.f64 phi2) (*.f64 (PI.f64) #s(literal 1/2 binary64))) phi1))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 (neg.f64 phi1)))) (sin.f64 (+.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) phi2) (neg.f64 (neg.f64 phi1))))) #s(literal 2 binary64)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
Outputs
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
Calls

1 calls:

34.0ms
phi1
Results
AccuracySegmentsBranch
82.0%3phi1
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes68.0ms (0.4%)

Memory
30.3MiB live, 73.6MiB allocated; 5ms collecting garbage
Counts
98 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi2 (+.f64 phi1 (/.f64 (cos.f64 lambda1) phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)) (*.f64 phi1 phi2)))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) #s(approx (* (cos lambda1) (cos phi2)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2)) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi2)))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal -1 binary64) phi1)))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (*.f64 #s(literal 2 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi1)) #s(literal 1 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.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))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
Outputs
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
Calls

1 calls:

62.0ms
phi1
Results
AccuracySegmentsBranch
82.0%3phi1
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes292.0ms (1.8%)

Memory
16.7MiB live, 355.8MiB allocated; 54ms collecting garbage
Counts
97 → 4
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi2 (+.f64 phi1 (/.f64 (cos.f64 lambda1) phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)) (*.f64 phi1 phi2)))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) #s(approx (* (cos lambda1) (cos phi2)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2)) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi2)))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal -1 binary64) phi1)))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (*.f64 #s(literal 2 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi1)) #s(literal 1 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.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))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) R)
Calls

5 calls:

92.0ms
phi1
72.0ms
lambda2
53.0ms
phi2
42.0ms
(-.f64 lambda1 lambda2)
28.0ms
lambda1
Results
AccuracySegmentsBranch
67.8%3(-.f64 lambda1 lambda2)
75.8%4lambda1
76.5%4lambda2
78.1%4phi2
75.1%3phi1
Compiler

Compiled 7 to 26 computations (-271.4% saved)

regimes33.0ms (0.2%)

Memory
-1.2MiB live, 89.6MiB allocated; 7ms collecting garbage
Counts
95 → 4
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi2 (+.f64 phi1 (/.f64 (cos.f64 lambda1) phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)) (*.f64 phi1 phi2)))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) #s(approx (* (cos lambda1) (cos phi2)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2)) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi2)))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal -1 binary64) phi1)))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (*.f64 #s(literal 2 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi1)) #s(literal 1 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.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))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
Calls

1 calls:

25.0ms
phi2
Results
AccuracySegmentsBranch
78.1%4phi2
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes36.0ms (0.2%)

Memory
-10.6MiB live, 87.4MiB allocated; 12ms collecting garbage
Counts
94 → 4
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi2 (+.f64 phi1 (/.f64 (cos.f64 lambda1) phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)) (*.f64 phi1 phi2)))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) #s(approx (* (cos lambda1) (cos phi2)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2)) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi2)))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal -1 binary64) phi1)))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (*.f64 #s(literal 2 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi1)) #s(literal 1 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.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))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
Calls

1 calls:

31.0ms
phi2
Results
AccuracySegmentsBranch
77.9%4phi2
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes258.0ms (1.6%)

Memory
21.7MiB live, 485.3MiB allocated; 64ms collecting garbage
Counts
93 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi2 (+.f64 phi1 (/.f64 (cos.f64 lambda1) phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)) (*.f64 phi1 phi2)))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) #s(approx (* (cos lambda1) (cos phi2)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2)) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi2)))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal -1 binary64) phi1)))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (*.f64 #s(literal 2 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi1)) #s(literal 1 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.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))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1))))) (*.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
Calls

9 calls:

36.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
35.0ms
lambda1
31.0ms
lambda2
27.0ms
phi1
26.0ms
R
Results
AccuracySegmentsBranch
54.3%1(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
54.3%1R
54.3%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
54.3%1(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
58.3%3lambda1
64.6%2(cos.f64 (-.f64 lambda1 lambda2))
71.9%3lambda2
65.4%3phi1
72.7%3phi2
Compiler

Compiled 55 to 80 computations (-45.5% saved)

regimes217.0ms (1.3%)

Memory
-31.2MiB live, 243.6MiB allocated; 137ms collecting garbage
Counts
92 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi2 (+.f64 phi1 (/.f64 (cos.f64 lambda1) phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)) (*.f64 phi1 phi2)))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) #s(approx (* (cos lambda1) (cos phi2)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2)) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi2)))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal -1 binary64) phi1)))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (*.f64 #s(literal 2 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi1)) #s(literal 1 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.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))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
Calls

5 calls:

111.0ms
lambda2
28.0ms
(-.f64 lambda1 lambda2)
25.0ms
(cos.f64 (-.f64 lambda1 lambda2))
24.0ms
phi2
24.0ms
phi1
Results
AccuracySegmentsBranch
62.1%4phi1
54.8%2(cos.f64 (-.f64 lambda1 lambda2))
54.1%2(-.f64 lambda1 lambda2)
63.5%3lambda2
62.8%3phi2
Compiler

Compiled 10 to 28 computations (-180% saved)

regimes31.0ms (0.2%)

Memory
-39.4MiB live, 58.5MiB allocated; 6ms collecting garbage
Counts
91 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi2 (+.f64 phi1 (/.f64 (cos.f64 lambda1) phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)) (*.f64 phi1 phi2)))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) #s(approx (* (cos lambda1) (cos phi2)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2)) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi2)))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal -1 binary64) phi1)))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (*.f64 #s(literal 2 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi1)) #s(literal 1 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.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))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
Calls

1 calls:

25.0ms
lambda2
Results
AccuracySegmentsBranch
63.5%3lambda2
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes76.0ms (0.5%)

Memory
46.7MiB live, 136.2MiB allocated; 6ms collecting garbage
Counts
90 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi2 (+.f64 phi1 (/.f64 (cos.f64 lambda1) phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)) (*.f64 phi1 phi2)))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) #s(approx (* (cos lambda1) (cos phi2)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2)) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi2)))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal -1 binary64) phi1)))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (*.f64 #s(literal 2 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi1)) #s(literal 1 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.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))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.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))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
Calls

3 calls:

26.0ms
lambda2
23.0ms
phi1
22.0ms
phi2
Results
AccuracySegmentsBranch
60.4%4phi1
59.0%3phi2
54.1%5lambda2
Compiler

Compiled 3 to 15 computations (-400% saved)

regimes31.0ms (0.2%)

Memory
1.2MiB live, 51.5MiB allocated; 6ms collecting garbage
Counts
88 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi2 (+.f64 phi1 (/.f64 (cos.f64 lambda1) phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)) (*.f64 phi1 phi2)))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) #s(approx (* (cos lambda1) (cos phi2)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2)) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi2)))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal -1 binary64) phi1)))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (*.f64 (neg.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 #s(approx (cos phi2) (fma.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64) #s(literal 1 binary64))) (cos.f64 phi1)) (cos.f64 lambda1))))) R)
(*.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 (*.f64 #s(literal -1/2 binary64) (PI.f64))) (*.f64 (cos.f64 lambda1) (sin.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.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))))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 #s(approx (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) (*.f64 #s(literal 2 binary64) (cos.f64 phi1))) #s(literal 1/2 binary64)) (sin.f64 (+.f64 (-.f64 lambda2 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64))))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) phi1)) #s(literal 1 binary64)))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.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))))) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
Calls

1 calls:

22.0ms
phi2
Results
AccuracySegmentsBranch
59.0%3phi2
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes43.0ms (0.3%)

Memory
-14.8MiB live, 76.6MiB allocated; 4ms collecting garbage
Counts
71 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi2 (+.f64 phi1 (/.f64 (cos.f64 lambda1) phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)) (*.f64 phi1 phi2)))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) #s(approx (* (cos lambda1) (cos phi2)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2)) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi2)))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (fma.f64 lambda2 (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(approx (sin phi2) phi2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal -1 binary64) phi1)))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (sin.f64 #s(approx (- (* 1/2 (PI)) phi1) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (+.f64 (*.f64 #s(approx (sin phi1) phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
Calls

2 calls:

21.0ms
phi1
18.0ms
phi2
Results
AccuracySegmentsBranch
58.8%3phi1
58.8%3phi2
Compiler

Compiled 2 to 10 computations (-400% saved)

regimes20.0ms (0.1%)

Memory
-19.7MiB live, 25.9MiB allocated; 2ms collecting garbage
Counts
62 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi2 (+.f64 phi1 (/.f64 (cos.f64 lambda1) phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)) (*.f64 phi1 phi2)))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) #s(approx (* (cos lambda1) (cos phi2)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2)) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi2)))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) #s(approx (* (cos phi1) (cos phi2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- 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))))))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
Calls

1 calls:

17.0ms
phi2
Results
AccuracySegmentsBranch
58.8%3phi2
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes51.0ms (0.3%)

Memory
25.1MiB live, 74.9MiB allocated; 8ms collecting garbage
Counts
58 → 2
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi2 (+.f64 phi1 (/.f64 (cos.f64 lambda1) phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)) (*.f64 phi1 phi2)))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) #s(approx (* (cos lambda1) (cos phi2)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1)) (sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) phi1))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (+.f64 (sin.f64 (-.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1))) (sin.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1) (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (-.f64 (cos.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1))) (cos.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 lambda2 lambda1)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)))) #s(literal 2 binary64)))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (*.f64 lambda1 (fma.f64 #s(literal -1 binary64) (sin.f64 (neg.f64 lambda2)) (/.f64 (cos.f64 (neg.f64 lambda2)) lambda1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 phi2 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (*.f64 phi1 (+.f64 (sin.f64 phi2) (/.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) phi1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (cos.f64 lambda1) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) lambda1)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (sin.f64 (neg.f64 lambda2))))))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 (cos.f64 lambda1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) (*.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (cos.f64 phi2)))))) R)
(*.f64 (fma.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
(*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)) (asin.f64 (neg.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (-.f64 (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) lambda1)))) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) #s(approx (cos phi2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi2 #s(literal 2 binary64)))))) #s(approx (* (sin phi1) (sin phi2)) (*.f64 phi2 (sin.f64 phi1)))))) R)
Outputs
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
Calls

3 calls:

18.0ms
phi1
15.0ms
phi2
15.0ms
lambda1
Results
AccuracySegmentsBranch
47.1%3lambda1
56.7%2phi1
56.7%2phi2
Compiler

Compiled 3 to 15 computations (-400% saved)

regimes12.0ms (0.1%)

Memory
-23.8MiB live, 20.7MiB allocated; 3ms collecting garbage
Counts
29 → 2
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi2 (+.f64 phi1 (/.f64 (cos.f64 lambda1) phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)) (*.f64 phi1 phi2)))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) #s(approx (* (cos lambda1) (cos phi2)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (sin (+ (neg phi2) (* (PI) 1/2)))) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (/ (+ (sin (- (+ (neg phi1) (* (PI) 1/2)) phi2)) (sin (+ (+ (neg phi1) (* (PI) 1/2)) phi2))) 2) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (+ (cos (+ phi2 phi1)) (cos (- phi1 phi2))) 1/2) (sin (+ (- lambda2 lambda1) (* (PI) 1/2))))) (*.f64 (cos.f64 phi1) (sin.f64 (-.f64 (+.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (PI.f64))) lambda1))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) R)
Calls

1 calls:

8.0ms
phi1
Results
AccuracySegmentsBranch
56.7%2phi1
Compiler

Compiled 1 to 5 computations (-400% saved)

regimes54.0ms (0.3%)

Memory
39.8MiB live, 85.5MiB allocated; 2ms collecting garbage
Counts
22 → 2
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi2 (+.f64 phi1 (/.f64 (cos.f64 lambda1) phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)) (*.f64 phi1 phi2)))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) #s(approx (* (cos lambda1) (cos phi2)) (cos.f64 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
Calls

8 calls:

8.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
7.0ms
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
6.0ms
R
6.0ms
phi2
6.0ms
(-.f64 lambda1 lambda2)
Results
AccuracySegmentsBranch
43.9%1(-.f64 lambda1 lambda2)
43.9%1(cos.f64 (-.f64 lambda1 lambda2))
43.9%1(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
43.9%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
43.9%1(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
43.9%1R
52.5%2phi2
45.8%2phi1
Compiler

Compiled 56 to 76 computations (-35.7% saved)

regimes72.0ms (0.4%)

Memory
-40.7MiB live, 105.8MiB allocated; 17ms collecting garbage
Counts
21 → 2
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi2 (+.f64 phi1 (/.f64 (cos.f64 lambda1) phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)) (*.f64 phi1 phi2)))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (fma.f64 phi1 (sin.f64 phi2) #s(approx (* (cos lambda1) (cos phi2)) (cos.f64 phi2)))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
Calls

10 calls:

11.0ms
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
8.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
8.0ms
phi2
6.0ms
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
6.0ms
lambda2
Results
AccuracySegmentsBranch
34.6%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
34.6%1(cos.f64 (-.f64 lambda1 lambda2))
34.6%1(-.f64 lambda1 lambda2)
34.6%1(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
34.6%1(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
34.6%1R
43.7%2lambda1
40.7%3phi1
43.8%2lambda2
44.8%2phi2
Compiler

Compiled 58 to 86 computations (-48.3% saved)

regimes24.0ms (0.1%)

Memory
0.9MiB live, 46.7MiB allocated; 1ms collecting garbage
Counts
18 → 3
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi2 (+.f64 phi1 (/.f64 (cos.f64 lambda1) phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)) (*.f64 phi1 phi2)))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))) R)
Calls

4 calls:

6.0ms
phi1
6.0ms
phi2
5.0ms
lambda1
5.0ms
lambda2
Results
AccuracySegmentsBranch
39.8%3phi1
28.3%1lambda1
33.5%2lambda2
37.8%2phi2
Compiler

Compiled 4 to 20 computations (-400% saved)

regimes11.0ms (0.1%)

Memory
10.8MiB live, 10.8MiB allocated; 0ms collecting garbage
Counts
17 → 2
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi2 (+.f64 phi1 (/.f64 (cos.f64 lambda1) phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)) (*.f64 phi1 phi2)))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos phi1) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
Calls

2 calls:

5.0ms
phi2
5.0ms
phi1
Results
AccuracySegmentsBranch
28.3%1phi2
36.6%2phi1
Compiler

Compiled 2 to 10 computations (-400% saved)

regimes55.0ms (0.3%)

Memory
-13.2MiB live, 85.7MiB allocated; 10ms collecting garbage
Counts
16 → 2
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi2 (+.f64 phi1 (/.f64 (cos.f64 lambda1) phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)) (*.f64 phi1 phi2)))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) (cos.f64 (neg.f64 lambda2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #s(approx (cos phi1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 phi1 #s(literal 2 binary64))))) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 lambda2 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)))))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(approx (cos phi1) (fma.f64 (*.f64 phi1 phi1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))) R)
Calls

10 calls:

8.0ms
R
7.0ms
phi2
5.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
5.0ms
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
5.0ms
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Results
AccuracySegmentsBranch
18.8%1phi2
18.8%1lambda1
18.8%1lambda2
18.8%1(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
18.8%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
18.8%1(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
18.8%1R
18.8%1(-.f64 lambda1 lambda2)
18.8%1(cos.f64 (-.f64 lambda1 lambda2))
20.6%2phi1
Compiler

Compiled 58 to 86 computations (-48.3% saved)

regimes40.0ms (0.2%)

Memory
20.4MiB live, 64.5MiB allocated; 3ms collecting garbage
Counts
11 → 1
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi2 (+.f64 phi1 (/.f64 (cos.f64 lambda1) phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) lambda1)) (*.f64 phi1 phi2)))))) R)
(*.f64 (-.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 (PI.f64) #s(literal 1/2 binary64)))) (*.f64 phi1 phi2)))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi2 (+.f64 phi1 (/.f64 (cos.f64 lambda1) phi2)))))))) R)
Calls

10 calls:

6.0ms
lambda2
4.0ms
R
4.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
4.0ms
phi2
4.0ms
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
Results
AccuracySegmentsBranch
9.7%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
9.7%1R
9.7%1(-.f64 lambda1 lambda2)
9.7%1(cos.f64 (-.f64 lambda1 lambda2))
9.7%1lambda2
9.7%1(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
9.7%1lambda1
9.7%1phi2
9.7%1(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
9.7%1phi1
Compiler

Compiled 58 to 86 computations (-48.3% saved)

regimes28.0ms (0.2%)

Memory
5.6MiB live, 51.9MiB allocated; 1ms collecting garbage
Counts
7 → 1
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (*.f64 phi1 (+.f64 phi2 (/.f64 (cos.f64 lambda1) phi1)))))))) R)
Calls

10 calls:

3.0ms
lambda2
3.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
3.0ms
(cos.f64 (-.f64 lambda1 lambda2))
3.0ms
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
3.0ms
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Results
AccuracySegmentsBranch
9.6%1(cos.f64 (-.f64 lambda1 lambda2))
9.6%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
9.6%1(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
9.6%1(-.f64 lambda1 lambda2)
9.6%1lambda2
9.6%1R
9.6%1(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
9.6%1phi1
9.6%1phi2
9.6%1lambda1
Compiler

Compiled 58 to 86 computations (-48.3% saved)

regimes25.0ms (0.2%)

Memory
0.5MiB live, 46.6MiB allocated; 2ms collecting garbage
Counts
6 → 1
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 (cos.f64 lambda1) (*.f64 phi1 phi2)))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (fma.f64 phi2 phi1 (cos.f64 lambda1)))))) R)
Calls

10 calls:

3.0ms
R
2.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
2.0ms
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
2.0ms
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
2.0ms
lambda2
Results
AccuracySegmentsBranch
9.5%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
9.5%1(-.f64 lambda1 lambda2)
9.5%1(cos.f64 (-.f64 lambda1 lambda2))
9.5%1(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
9.5%1R
9.5%1(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
9.5%1lambda2
9.5%1phi1
9.5%1phi2
9.5%1lambda1
Compiler

Compiled 58 to 86 computations (-48.3% saved)

regimes20.0ms (0.1%)

Memory
-17.7MiB live, 34.6MiB allocated; 3ms collecting garbage
Accuracy

Total -1.2b remaining (-1.9%)

Threshold costs -1.2b (-1.9%)

Counts
4 → 1
Calls
Call 1
Inputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) #s(approx (+ (cos lambda1) (* phi1 phi2)) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (pow.f64 lambda1 #s(literal 2 binary64)) (*.f64 phi1 phi2)))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda1 lambda2))))))) R)
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 #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 (- lambda1 lambda2)) #s(approx (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (+.f64 #s(literal 1 binary64) (*.f64 lambda2 (+.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda2))))))))) R)
Outputs
(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) #s(approx (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2))) (+.f64 #s(approx (cos lambda1) #s(literal 1 binary64)) (*.f64 phi1 phi2)))))) R)
Calls

10 calls:

3.0ms
(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
2.0ms
(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
2.0ms
(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
2.0ms
lambda1
2.0ms
(-.f64 lambda1 lambda2)
Results
AccuracySegmentsBranch
2.9%1(+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
2.9%1(cos.f64 (-.f64 lambda1 lambda2))
2.9%1(acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
2.9%1(-.f64 lambda1 lambda2)
2.9%1R
2.9%1lambda2
2.9%1phi2
2.9%1(*.f64 (acos.f64 (+.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
2.9%1lambda1
2.9%1phi1
Compiler

Compiled 58 to 86 computations (-48.3% saved)

bsearch136.0ms (0.8%)

Memory
11.6MiB live, 198.3MiB allocated; 12ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
69.0ms
2.165031761328859e-30
4.6322638469930446e-8
59.0ms
-1.7485323657222955
-5.623737092928549e-6
Samples
106.0ms274×1valid
7.0ms46×0valid
Compiler

Compiled 902 to 945 computations (-4.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 101.0ms
ival-cos: 36.0ms (35.8% of total)
ival-sin: 23.0ms (22.9% of total)
adjust: 14.0ms (13.9% of total)
ival-mult!: 13.0ms (12.9% of total)
ival-acos: 12.0ms (11.9% of total)
ival-sub!: 1.0ms (1% of total)
ival-add!: 1.0ms (1% of total)

bsearch52.0ms (0.3%)

Memory
25.0MiB live, 70.1MiB allocated; 3ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
2.165031761328859e-30
4.6322638469930446e-8
47.0ms
-1.7485323657222955
-5.623737092928549e-6
Samples
36.0ms87×1valid
6.0ms41×0valid
Compiler

Compiled 782 to 825 computations (-5.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 37.0ms
ival-cos: 15.0ms (41.1% of total)
ival-sin: 9.0ms (24.7% of total)
adjust: 4.0ms (11% of total)
ival-mult!: 4.0ms (11% of total)
ival-acos: 4.0ms (11% of total)
ival-sub!: 1.0ms (2.7% of total)
ival-add!: 0.0ms (0% of total)

bsearch51.0ms (0.3%)

Memory
-25.6MiB live, 65.9MiB allocated; 5ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
2.165031761328859e-30
4.6322638469930446e-8
46.0ms
-1.7485323657222955
-5.623737092928549e-6
Samples
38.0ms99×1valid
2.0ms13×0valid
Compiler

Compiled 802 to 845 computations (-5.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 35.0ms
ival-cos: 13.0ms (37.4% of total)
ival-sin: 8.0ms (23% of total)
ival-acos: 5.0ms (14.4% of total)
adjust: 4.0ms (11.5% of total)
ival-mult!: 4.0ms (11.5% of total)
ival-sub!: 1.0ms (2.9% of total)
ival-add!: 0.0ms (0% of total)

bsearch4.0ms (0%)

Memory
7.3MiB live, 7.3MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
2.165031761328859e-30
4.6322638469930446e-8
1.0ms
-1.7485323657222955
-5.623737092928549e-6
Compiler

Compiled 1 002 to 1 045 computations (-4.3% saved)

bsearch82.0ms (0.5%)

Memory
3.8MiB live, 106.1MiB allocated; 15ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
41.0ms
2.165031761328859e-30
4.6322638469930446e-8
36.0ms
-1.7485323657222955
-5.623737092928549e-6
Samples
64.0ms153×1valid
4.0ms23×0valid
Compiler

Compiled 962 to 1 005 computations (-4.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 61.0ms
ival-cos: 19.0ms (31.1% of total)
ival-sin: 18.0ms (29.5% of total)
adjust: 9.0ms (14.7% of total)
ival-mult!: 6.0ms (9.8% of total)
ival-acos: 6.0ms (9.8% of total)
ival-sub!: 1.0ms (1.6% of total)
ival-add!: 1.0ms (1.6% of total)

bsearch3.0ms (0%)

Memory
9.4MiB live, 9.4MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
2.165031761328859e-30
4.6322638469930446e-8
1.0ms
-1.7485323657222955
-5.623737092928549e-6
Compiler

Compiled 962 to 1 005 computations (-4.5% saved)

bsearch194.0ms (1.2%)

Memory
-18.3MiB live, 262.8MiB allocated; 29ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
narrow-enough
Steps
TimeLeftRight
72.0ms
4.415427366809383e+203
9.572904029058505e+208
51.0ms
0.0011218535371005614
1.746647441206832
60.0ms
-7.763347556495991e-5
-1.2759841226312847e-7
Samples
145.0ms315×1valid
19.0ms85×0valid
Compiler

Compiled 1 464 to 1 517 computations (-3.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 148.0ms
ival-cos: 60.0ms (40.6% of total)
ival-sin: 37.0ms (25% of total)
ival-mult!: 18.0ms (12.2% of total)
adjust: 17.0ms (11.5% of total)
ival-acos: 12.0ms (8.1% of total)
ival-sub!: 2.0ms (1.4% of total)
ival-add!: 2.0ms (1.4% of total)

bsearch5.0ms (0%)

Memory
6.8MiB live, 6.8MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
4.415427366809383e+203
9.572904029058505e+208
1.0ms
0.0011218535371005614
1.746647441206832
1.0ms
-7.763347556495991e-5
-1.2759841226312847e-7
Compiler

Compiled 1 527 to 1 580 computations (-3.5% saved)

bsearch115.0ms (0.7%)

Memory
-10.1MiB live, 90.0MiB allocated; 10ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
4.415427366809383e+203
9.572904029058505e+208
1.0ms
0.0011218535371005614
1.746647441206832
109.0ms
-37.71677699073321
-0.000925712356551307
Samples
95.0ms103×1valid
4.0ms25×0valid
Compiler

Compiled 1 487 to 1 540 computations (-3.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 94.0ms
ival-cos: 70.0ms (74.8% of total)
ival-sin: 10.0ms (10.7% of total)
adjust: 4.0ms (4.3% of total)
ival-mult!: 4.0ms (4.3% of total)
ival-acos: 4.0ms (4.3% of total)
ival-sub!: 1.0ms (1.1% of total)
ival-add!: 1.0ms (1.1% of total)

bsearch77.0ms (0.5%)

Memory
13.9MiB live, 106.3MiB allocated; 4ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
72.0ms
3.163209535605473e-14
1.0119426515313624e-6
1.0ms
-37.71677699073321
-0.000925712356551307
Samples
48.0ms126×1valid
3.0ms18×0valid
Compiler

Compiled 991 to 1 028 computations (-3.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 45.0ms
ival-cos: 18.0ms (39.7% of total)
ival-sin: 11.0ms (24.2% of total)
adjust: 5.0ms (11% of total)
ival-mult!: 5.0ms (11% of total)
ival-acos: 5.0ms (11% of total)
ival-sub!: 1.0ms (2.2% of total)
ival-add!: 1.0ms (2.2% of total)

bsearch105.0ms (0.6%)

Memory
-6.8MiB live, 180.2MiB allocated; 15ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
52.0ms
4.536765781500029e+182
3.2707491099415344e+184
44.0ms
5.6451434688120214e-5
0.002604463673995266
Samples
75.0ms180×1valid
11.0ms44×0valid
Compiler

Compiled 771 to 746 computations (3.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 77.0ms
ival-cos: 34.0ms (44% of total)
ival-sin: 18.0ms (23.3% of total)
ival-acos: 9.0ms (11.6% of total)
adjust: 7.0ms (9.1% of total)
ival-mult!: 7.0ms (9.1% of total)
ival-sub!: 1.0ms (1.3% of total)
ival-add!: 1.0ms (1.3% of total)

bsearch3.0ms (0%)

Memory
8.4MiB live, 8.4MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
4.536765781500029e+182
3.2707491099415344e+184
1.0ms
5.6451434688120214e-5
0.002604463673995266
Compiler

Compiled 771 to 746 computations (3.2% saved)

bsearch99.0ms (0.6%)

Memory
11.5MiB live, 157.5MiB allocated; 21ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
51.0ms
1.746647441206832
179.74832306343555
43.0ms
-37.71677699073321
-0.000925712356551307
Samples
70.0ms140×1valid
11.0ms68×0valid
Compiler

Compiled 808 to 793 computations (1.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 73.0ms
ival-cos: 33.0ms (45% of total)
ival-sin: 21.0ms (28.6% of total)
adjust: 6.0ms (8.2% of total)
ival-mult!: 6.0ms (8.2% of total)
ival-acos: 6.0ms (8.2% of total)
ival-sub!: 1.0ms (1.4% of total)
ival-add!: 1.0ms (1.4% of total)

bsearch95.0ms (0.6%)

Memory
-19.9MiB live, 125.3MiB allocated; 11ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
42.0ms
0.0011218535371005614
1.746647441206832
48.0ms
-37.71677699073321
-0.000925712356551307
Samples
67.0ms153×1valid
12.0ms71×0valid
Compiler

Compiled 758 to 745 computations (1.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 70.0ms
ival-cos: 26.0ms (37.1% of total)
ival-sin: 23.0ms (32.8% of total)
ival-mult!: 7.0ms (10% of total)
adjust: 6.0ms (8.6% of total)
ival-acos: 6.0ms (8.6% of total)
ival-sub!: 1.0ms (1.4% of total)
ival-add!: 1.0ms (1.4% of total)

bsearch36.0ms (0.2%)

Memory
1.3MiB live, 46.0MiB allocated; 5ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
1.746647441206832
179.74832306343555
33.0ms
-37.71677699073321
-0.000925712356551307
Samples
26.0ms62×1valid
2.0ms18×0valid
Compiler

Compiled 913 to 838 computations (8.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 26.0ms
ival-cos: 9.0ms (35.1% of total)
ival-sin: 6.0ms (23.4% of total)
ival-acos: 5.0ms (19.5% of total)
adjust: 3.0ms (11.7% of total)
ival-mult!: 3.0ms (11.7% of total)
ival-sub!: 0.0ms (0% of total)
ival-add!: 0.0ms (0% of total)

bsearch2.0ms (0%)

Memory
2.8MiB live, 2.8MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
0.0011218535371005614
1.746647441206832
1.0ms
-37.71677699073321
-0.000925712356551307
Compiler

Compiled 854 to 841 computations (1.5% saved)

bsearch51.0ms (0.3%)

Memory
10.3MiB live, 55.1MiB allocated; 4ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
48.0ms
-36.70339596763435
-1.7485323657222955
Samples
38.0ms80×1valid
6.0ms32×0valid
Compiler

Compiled 358 to 375 computations (-4.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 37.0ms
ival-cos: 15.0ms (40.4% of total)
ival-sin: 12.0ms (32.3% of total)
ival-mult!: 4.0ms (10.8% of total)
adjust: 3.0ms (8.1% of total)
ival-acos: 3.0ms (8.1% of total)
ival-sub!: 0.0ms (0% of total)
ival-add!: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
1.9MiB live, 1.9MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
1.0ms
-36.70339596763435
-1.7485323657222955
Compiler

Compiled 330 to 347 computations (-5.2% saved)

bsearch29.0ms (0.2%)

Memory
-13.0MiB live, 39.9MiB allocated; 8ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
27.0ms
0.0011218535371005614
1.746647441206832
Samples
21.0ms44×1valid
3.0ms20×0valid
Compiler

Compiled 446 to 417 computations (6.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 22.0ms
ival-cos: 11.0ms (51% of total)
ival-sin: 4.0ms (18.6% of total)
adjust: 2.0ms (9.3% of total)
ival-mult!: 2.0ms (9.3% of total)
ival-acos: 2.0ms (9.3% of total)
ival-sub!: 0.0ms (0% of total)
ival-add!: 0.0ms (0% of total)

bsearch55.0ms (0.3%)

Memory
41.2MiB live, 84.1MiB allocated; 9ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
51.0ms
7.673693498489789e-20
2.214753757818486e-17
Samples
42.0ms103×1valid
4.0ms25×0valid
Compiler

Compiled 470 to 425 computations (9.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 41.0ms
ival-cos: 13.0ms (31.7% of total)
ival-sin: 9.0ms (21.9% of total)
ival-acos: 9.0ms (21.9% of total)
adjust: 4.0ms (9.7% of total)
ival-mult!: 4.0ms (9.7% of total)
ival-sub!: 1.0ms (2.4% of total)
ival-add!: 0.0ms (0% of total)

bsearch93.0ms (0.6%)

Memory
-11.4MiB live, 134.4MiB allocated; 11ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
43.0ms
-5.042144383702384e-139
-1.1859696327442974e-139
44.0ms
-1.7485323657222955
-5.623737092928549e-6
Samples
60.0ms151×1valid
11.0ms46×0valid
7.0ms11×2valid
Compiler

Compiled 847 to 802 computations (5.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 68.0ms
ival-cos: 28.0ms (41.4% of total)
ival-sin: 14.0ms (20.7% of total)
ival-acos: 8.0ms (11.8% of total)
adjust: 7.0ms (10.4% of total)
ival-mult!: 7.0ms (10.4% of total)
ival-add!: 3.0ms (4.4% of total)
ival-sub!: 1.0ms (1.5% of total)

bsearch2.0ms (0%)

Memory
1.2MiB live, 1.2MiB allocated; 0ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
1.0ms
-1.7485323657222955
-5.623737092928549e-6
Compiler

Compiled 499 to 484 computations (3% saved)

bsearch61.0ms (0.4%)

Memory
6.5MiB live, 51.4MiB allocated; 3ms collecting garbage
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
58.0ms
-2754.606998816405
-36.70339596763435
Samples
46.0ms73×1valid
7.0ms39×0valid
Compiler

Compiled 512 to 452 computations (11.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 49.0ms
ival-acos: 17.0ms (34.8% of total)
ival-cos: 14.0ms (28.7% of total)
ival-sin: 11.0ms (22.5% of total)
adjust: 3.0ms (6.1% of total)
ival-mult!: 3.0ms (6.1% of total)
ival-sub!: 0.0ms (0% of total)
ival-add!: 0.0ms (0% of total)

derivations370.0ms (2.2%)

Memory
-22.3MiB live, 367.6MiB allocated; 92ms collecting garbage
Stop Event
fuel
Compiler

Compiled 664 to 330 computations (50.3% saved)

preprocess578.0ms (3.5%)

Memory
14.7MiB live, 1 116.6MiB allocated; 112ms collecting garbage
Remove

(sort phi1 phi2)

(sort lambda1 lambda2)

(negabs R)

Compiler

Compiled 15 761 to 11 285 computations (28.4% saved)

end0.0ms (0%)

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

Profiling

Loading profile data...